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

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

Offset

1,1

Links

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

Mathematica

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

Crossrefs

Cf. A126043-A126059.

Sequence in context: A100111 A092878 A126059 * A233008 A233009 A243535

Adjacent sequences: A126055 A126056 A126057 * A126059 A126060 A126061

Keyword

nonn,more

Author

Artur Jasinski, Dec 17 2006

Extensions

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

Status

approved