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

2, 3, 1, 3, 1, 1, 3, 3, 1, 1, 3, 3, 1, 3, 3, 3, 1, 1, 1, 3, 1, 1, 1, 1, 1, 1, 1, 3, 3, 4, 3, 3, 1, 3, 1, 1, 1, 1, 1, 3, 3, 3, 1, 1, 3, 1, 1, 1

Offset: 1

Author

Artur Jasinski, Dec 17 2006

Keywords

• nonn
• more

Crossrefs

Cf. A000043, A010873, A126043-A126059.

Programs

Mathematica

Array[Mod[MersennePrimeExponent@ #, 4] &, 45] (* Michael De Vlieger, Apr 07 2018 *)

Formula

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

Extensions

a(45)-a(46) from Ivan Panchenko, Apr 07 2018

a(47) from Ivan Panchenko, Apr 09 2018

a(48) from Amiram Eldar, Oct 14 2024