# Rosetta code + Wolfram language \[Episodes 1–5\]

**URL:** <https://community.wolfram.com/t/rosetta-code-wolfram-language-episodes-1-5/20232>\
**Category:** Challenges\
**Tags:** chemistry\
**Created:** [July 2, 2022, 6:44pm UTC](https://community.wolfram.com/t/rosetta-code-wolfram-language-episodes-1-5/20232 "2022-07-02T18:44:27Z")\
**Posts on this page:** 6\
**Page:** 1

<div class="post-metadata">

**Author:** ![sghuisman](https://yyz1.discourse-cdn.com/wolfram/user_avatar/community.wolfram.com/sghuisman/32/27850_2.png) [@sghuisman](https://community.wolfram.com/u/sghuisman)\
**Post date:** [July 2, 2022, 6:44pm UTC](https://community.wolfram.com/t/rosetta-code-wolfram-language-episodes-1-5/20232/1 "2022-07-02T18:44:27Z")

</div>

I’m a long-time solver of Rosetta code problems for Mathematica (and later Wolfram Language). I’ve done hundreds of entries, with the earliest entries in 2009. See also the [other community post](https://wolfram.discourse.group/t/2321/1) on this topic. In this roughly ~1 hour episode I solve these problems:

- [Halt and catch fire](http://www.rosettacode.org/wiki/Halt_and_catch_fire)
- [Ultra useful primes](http://www.rosettacode.org/wiki/Ultra_useful_primes)
- [Periodic table](http://www.rosettacode.org/wiki/Periodic_table)
- [Earliest difference between prime gaps‎](http://www.rosettacode.org/wiki/Earliest_difference_between_prime_gaps)
- [Pell numbers](http://www.rosettacode.org/wiki/Pell_numbers)

Click here to watch:

 ![Logo.jpg](https://global.discourse-cdn.com/wolfram/original/3X/3/2/3228738c88e08bb33c30d76adc0a2b9eda1642ad.jpeg)

---

<div class="post-metadata">

**Author:** ![sghuisman](https://yyz1.discourse-cdn.com/wolfram/user_avatar/community.wolfram.com/sghuisman/32/27850_2.png) [@sghuisman](https://community.wolfram.com/u/sghuisman)\
**Post date:** [July 3, 2022, 3:13pm UTC](https://community.wolfram.com/t/rosetta-code-wolfram-language-episodes-1-5/20232/2 "2022-07-03T15:13:21Z")

</div>

And in episode 2 I solved some more:

- [Erdős-primes](http://www.rosettacode.org/wiki/Erd%C5%91s-primes)
- [First 9 prime Fibonacci number](http://www.rosettacode.org/wiki/First_9_prime_Fibonacci_number)
- [Last list item](http://www.rosettacode.org/wiki/Last_list_item)
- [Euclid-Mullin sequence](http://www.rosettacode.org/wiki/Euclid-Mullin_sequence)
- [Mersenne primes](http://www.rosettacode.org/wiki/Mersenne_primes)
- [N-body problem](http://www.rosettacode.org/wiki/N-body_problem)
- [Odd words](http://www.rosettacode.org/wiki/Odd_words)
- [Own digits power sum](http://www.rosettacode.org/wiki/Own_digits_power_sum)
- [Overloaded operators](http://www.rosettacode.org/wiki/Overloaded_operators)

Click here to watch:

 ![Logo.jpg](https://global.discourse-cdn.com/wolfram/original/3X/3/2/3228738c88e08bb33c30d76adc0a2b9eda1642ad.jpeg)

---

<div class="post-metadata">

**Author:** ![sghuisman](https://yyz1.discourse-cdn.com/wolfram/user_avatar/community.wolfram.com/sghuisman/32/27850_2.png) [@sghuisman](https://community.wolfram.com/u/sghuisman)\
**Post date:** [July 3, 2022, 10:23pm UTC](https://community.wolfram.com/t/rosetta-code-wolfram-language-episodes-1-5/20232/3 "2022-07-03T22:23:25Z")

</div>

And in episode 3 I solved some more:

- [Arithmetic numbers](http://www.rosettacode.org/wiki/Arithmetic_numbers)
- [Cullen and Woodall numbers](http://www.rosettacode.org/wiki/Cullen_and_Woodall_numbers)
- [Equal prime and composite sums](http://www.rosettacode.org/wiki/Equal_prime_and_composite_sums)
- [Erdös-Selfridge categorization of primes](http://www.rosettacode.org/wiki/Erd%C3%B6s-Selfridge_categorization_of_primes)
- [Set right-adjacent bits](http://www.rosettacode.org/wiki/Set_right-adjacent_bits)

Click here to watch:

 ![Logo.jpg](https://global.discourse-cdn.com/wolfram/original/3X/3/2/3228738c88e08bb33c30d76adc0a2b9eda1642ad.jpeg)

---

<div class="post-metadata">

**Author:** ![sghuisman](https://yyz1.discourse-cdn.com/wolfram/user_avatar/community.wolfram.com/sghuisman/32/27850_2.png) [@sghuisman](https://community.wolfram.com/u/sghuisman)\
**Post date:** [July 5, 2022, 6:25pm UTC](https://community.wolfram.com/t/rosetta-code-wolfram-language-episodes-1-5/20232/4 "2022-07-05T18:25:31Z")

</div>

And in episode 4 I solved some more:

- [Getting the number of decimals](http://www.rosettacode.org/wiki/Getting_the_number_of_decimals)
- [Length of an arc between two angles](http://www.rosettacode.org/wiki/Length_of_an_arc_between_two_angles)
- [Next special primes](http://www.rosettacode.org/wiki/Next_special_primes)
- [Piprimes](http://www.rosettacode.org/wiki/Piprimes)
- [Quadrat special primes](http://www.rosettacode.org/wiki/Quadrat_special_primes)
- [Non-transitive dice](http://www.rosettacode.org/wiki/Non-transitive_dice)
- [Substitution cipher](http://www.rosettacode.org/wiki/Substitution_cipher)

Click here to watch:

 ![Logo.jpg](https://global.discourse-cdn.com/wolfram/original/3X/3/2/3228738c88e08bb33c30d76adc0a2b9eda1642ad.jpeg)

---

<div class="post-metadata">

**Author:** ![sghuisman](https://yyz1.discourse-cdn.com/wolfram/user_avatar/community.wolfram.com/sghuisman/32/27850_2.png) [@sghuisman](https://community.wolfram.com/u/sghuisman)\
**Post date:** [July 8, 2022, 9:17am UTC](https://community.wolfram.com/t/rosetta-code-wolfram-language-episodes-1-5/20232/5 "2022-07-08T09:17:42Z")

</div>

And in episode 5 I solved some more:

- [Eban numbers](http://www.rosettacode.org/wiki/Eban_numbers)
- [Magic constant](http://www.rosettacode.org/wiki/Magic_constant)
- [Smallest number k such that k+2^m is composite for all m less than k](http://www.rosettacode.org/wiki/Smallest_number_k_such_that_k+2%5Em_is_composite_for_all_m_less_than_k)
- [Prime triangle](http://www.rosettacode.org/wiki/Prime_triangle)

Click here to watch:

 ![Logo.jpg](https://global.discourse-cdn.com/wolfram/original/3X/3/2/3228738c88e08bb33c30d76adc0a2b9eda1642ad.jpeg)

---

<div class="post-metadata">

**Author:** ![sghuisman](https://yyz1.discourse-cdn.com/wolfram/user_avatar/community.wolfram.com/sghuisman/32/27850_2.png) [@sghuisman](https://community.wolfram.com/u/sghuisman)\
**Post date:** [August 4, 2022, 10:14pm UTC](https://community.wolfram.com/t/rosetta-code-wolfram-language-episodes-1-5/20232/6 "2022-08-04T22:14:36Z")

</div>

And in episode 6 I solved some more:

- [Digit fifth powers](http://rosettacode.org/wiki/Digit_fifth_powers)
- [Four sides of square](http://rosettacode.org/wiki/Four_sides_of_square)
- [Permutations with some identical elements](http://rosettacode.org/wiki/Permutations_with_some_identical_elements)
- [Prime numbers which contain 123](http://rosettacode.org/wiki/Prime_numbers_which_contain_123)
- [Numbers in base 10 palindromic in base 2 4 16](http://rosettacode.org/wiki/Numbers_in_base_10_that_are_palindromic_in_bases_2,_4,_and_16)
- [Numbers divisible by their digits but not by product of digits](http://rosettacode.org/wiki/Numbers_divisible_by_their_individual_digits,_but_not_by_the_product_of_their_digits.)
- [Smallest numbers](http://rosettacode.org/wiki/Smallest_numbers)
- [Prime words](http://rosettacode.org/wiki/Prime_words)
- [Sum of two adjacent numbers are primes](http://rosettacode.org/wiki/Sum_of_two_adjacent_numbers_are_primes)

Click here to watch:

 ![Logo.jpg](https://global.discourse-cdn.com/wolfram/original/3X/3/2/3228738c88e08bb33c30d76adc0a2b9eda1642ad.jpeg)
