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,1

Links

Table of n, a(n) for n=1..48.

Formula

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

Mathematica

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

Crossrefs

Cf. A000043, A010873, A126043-A126059.

Sequence in context: A064442 A287566 A134411 * A342344 A342101 A114899

Adjacent sequences: A126041 A126042 A126043 * A126045 A126046 A126047

Keyword

nonn,more

Author

Artur Jasinski, Dec 17 2006

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

Status

approved