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

2, 3, 5, 0, 6, 3, 5, 3, 5, 5, 2, 1, 3, 5, 5, 5, 6, 4, 4, 6, 1, 1, 6, 1, 1, 4, 5, 3, 1, 1, 1, 6, 1, 6, 5, 3, 2, 5, 2, 1, 4, 5, 1, 2, 2, 4, 1, 5

Offset

1,1

Links

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

Formula

a(n) = A010876(A000043(n)). - Ivan Panchenko, Apr 07 2018

Mathematica

Mod[MersennePrimeExponent[Range[48]], 7] (* Amiram Eldar, Oct 14 2024 *)

Crossrefs

Cf. A000043, A010876, A126043-A126059.

Sequence in context: A082118 A079344 A096535 * A023049 A240979 A368819

Adjacent sequences: A126044 A126045 A126046 * A126048 A126049 A126050

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