A126059 Exponents p of the Mersenne primes 2^p - 1 (see A000043) read mod 19.
2, 3, 5, 7, 13, 17, 0, 12, 4, 13, 12, 13, 8, 18, 6, 18, 1, 6, 16, 15, 18, 4, 3, 6, 3, 10, 18, 2, 18, 18, 4, 12, 6, 6, 2, 4, 16, 11, 2, 4, 6, 7, 6, 13, 1, 11, 13, 8
Offset: 1
Programs
-
Mathematica
Array[Mod[MersennePrimeExponent@ #, 19] &, 45] (* Michael De Vlieger, Apr 10 2018 *)
Extensions
a(45)-a(47) from Ivan Panchenko, Apr 09 2018
a(48) from Amiram Eldar, Oct 15 2024