A089065 Decimal expansion of 2^13466917 - 1, the 39th Mersenne prime A000668(39).
9, 2, 4, 9, 4, 7, 7, 3, 8, 0, 0, 6, 7, 0, 1, 3, 2, 2, 2, 4, 7, 7, 5, 8, 3, 8, 2, 5, 4, 7, 6, 6, 4, 0, 5, 1, 9, 2, 5, 3, 5, 4, 4, 0, 1, 0, 7, 9, 9, 5, 8, 2, 9, 9, 0, 2, 1, 0, 3, 0, 9, 3, 6, 0, 8, 0, 2, 9, 5, 6, 5, 6, 5, 8, 0, 5, 5, 9, 6, 1, 0, 0, 4, 7, 6, 1, 3, 1, 2, 1, 5, 5, 5, 7, 3, 0, 5, 8, 4, 6, 4, 9, 0, 2, 4
Offset: 4053946
Links
- Muniru A Asiru, Table of n, a(n) for n = 4053946..4055946
- Peter Alfeld, Largest Known Prime.
- OEIS Wiki, Mersenne primes (with a list of similar sequences)
Programs
-
Maple
evalf[120](2^(13466917)-1); # Muniru A Asiru, Mar 20 2019
-
Mathematica
IntegerDigits[2^13466917 - 1][[;;100]] (* Paolo Xausa, Apr 05 2024 *)
-
PARI
digitsm39(n) = { default(realprecision,n); p10 = frac(m*log(2)/log(10)); b = 10^p10/10; for(j=1,n, v=b*10; d=floor(v); b=v-d; print1(d",") ) }
Extensions
Edited by Georg Fischer, Mar 19 2019
Comments