A126056 Exponents p of the Mersenne primes 2^p - 1 (see A000043) read mod 16.

2, 3, 5, 7, 13, 1, 3, 15, 13, 9, 11, 15, 9, 15, 15, 11, 9, 1, 13, 7, 9, 5, 13, 1, 5, 9, 1, 3, 7, 1, 11, 7, 9, 11, 13, 13, 1, 1, 5, 11, 7, 7, 9, 1, 11, 9, 1, 9

Offset: 1

Author

Artur Jasinski, Dec 17 2006

Keywords

• nonn
• more

Crossrefs

Cf. A000043, A130909, A126043-A126059.

Programs

Mathematica

Mod[MersennePrimeExponent[Range[48]], 16] (* Amiram Eldar, Oct 15 2024 *)

Formula

a(n) = A130909(A000043(n)). - Michel Marcus, Apr 07 2018

Extensions

a(45)-a(47) from Ivan Panchenko, Apr 08 2018

a(48) from Amiram Eldar, Oct 15 2024