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

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

Offset: 1

Author

Artur Jasinski, Dec 17 2006

Keywords

• nonn
• more

Crossrefs

Cf. A000043, A070696, A126043-A126059.

Programs

Mathematica

Mod[MersennePrimeExponent[Range[47]],14] (* Harvey P. Dale, Aug 12 2021 *)

Formula

a(n) = A070696(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