|
%I #28 Sep 08 2022 08:46:01
%S 5,3,1,1,3,7,9,9,2,8,1,6,7,6,7,0,9,8,6,8,9,5,8,8,2,0,6,5,5,2,4,6,8,6,
%T 2,7,3,2,9,5,9,3,1,1,7,7,2,7,0,3,1,9,2,3,1,9,9,4,4,4,1,3,8,2,0,0,4,0,
%U 3,5,5,9,8,6,0,8,5,2,2,4,2,7,3,9,1,6,2,5,0,2,2,6,5,2,2,9,2,8,5,6,6,8,8,8,9
%N Decimal expansion of 2^607 - 1, the 14th Mersenne prime A000668(14).
%H M. F. Hasler, <a href="/A204063/b204063.txt">Table of n, a(n) for n = 183..365</a>
%H D. H. Lehmer, <a href="http://www.ams.org/journals/mcom/1952-06-037/S0025-5718-52-99404-0/S0025-5718-52-99404-0.pdf">Recent Discoveries of Large Primes</a>, Mathematics of Computation, vol. 6, No. 37 (1952), p. 61.
%H Wikipedia, <a href="http://en.wikipedia.org/wiki/Mersenne_prime">Mersenne prime</a>
%F 2^A000043(14)-1.
%e 2^607-1 = 531 * 10^180 +
%e 137992816767098689588206552468627329593117727031923199444138 * 10^120 +
%e 200403559860852242739162502265229285668889329486246501015346 * 10^60 +
%e 579337652707239409519978766587351943831270835393219031728127.
%t RealDigits[2^607-1,10,120][[1]] (* _Harvey P. Dale_, Sep 23 2016 *)
%o (Magma) Reverse(Intseq(2^607-1)); // _Arkadiusz Wesolowski_, Oct 18 2014
%o (PARI) digits(2^607-1) \\ Simplified by _M. F. Hasler_, Oct 19 2019
%Y Cf. A169684 = A000668(11), A169681 = A000668(12), A169685 = A000668(13), A248931 = A000668(15), A248932 = A000668(16), A248933 = A000668(17), A248934 = A000668(18), A248935 = A000668(19), A248936 = A000668(20).
%K nonn,cons,easy,fini,full
%O 183,1
%A _M. F. Hasler_, Jan 09 2013
|
