A126053 Exponents p of the Mersenne primes 2^p - 1 (see A000043) read mod 13.
2, 3, 5, 7, 0, 4, 6, 5, 9, 11, 3, 10, 1, 9, 5, 6, 6, 6, 2, 3, 4, 9, 7, 8, 4, 4, 11, 1, 3, 8, 5, 5, 3, 11, 2, 1, 8, 4, 9, 10, 12, 12, 7, 3, 2, 5, 7, 9
Offset: 1
Programs
-
Mathematica
Mod[MersennePrimeExponent[Range[48]], 13] (* Amiram Eldar, Oct 15 2024 *)
Extensions
a(45)-a(47) from Ivan Panchenko, Apr 08 2018
a(48) from Amiram Eldar, Oct 15 2024