A113656 Digits of successive exponents of Mersenne primes (see A000043).
2, 3, 5, 7, 1, 3, 1, 7, 1, 9, 3, 1, 6, 1, 8, 9, 1, 0, 7, 1, 2, 7, 5, 2, 1, 6, 0, 7, 1, 2, 7, 9, 2, 2, 0, 3, 2, 2, 8, 1, 3, 2, 1, 7, 4, 2, 5, 3, 4, 4, 2, 3, 9, 6, 8, 9, 9, 9, 4, 1, 1, 1, 2, 1, 3, 1, 9, 9, 3, 7, 2, 1, 7, 0, 1, 2, 3, 2, 0, 9, 4, 4, 4, 9, 7, 8, 6, 2, 4, 3, 1, 1, 0, 5, 0, 3, 1, 3, 2
Offset: 1
Links
- Amiram Eldar, Table of n, a(n) for n = 1..235 (terms 1..187 from Bill McEachen, terms 188..227 from Gord Palameta)
Crossrefs
Cf. A000043.
Programs
-
Mathematica
Flatten[IntegerDigits/@MersennePrimeExponent[Range[30]]] (* Harvey P. Dale, Aug 05 2021 *)