%I #27 Oct 07 2023 21:38:27
%S 6,8,6,4,7,9,7,6,6,0,1,3,0,6,0,9,7,1,4,9,8,1,9,0,0,7,9,9,0,8,1,3,9,3,
%T 2,1,7,2,6,9,4,3,5,3,0,0,1,4,3,3,0,5,4,0,9,3,9,4,4,6,3,4,5,9,1,8,5,5,
%U 4,3,1,8,3,3,9,7,6,5,6,0,5,2,1,2,2,5,5,9,6,4,0,6,6,1,4,5,4,5,5
%N Decimal expansion of 2^521 - 1.
%C The 13th Mersenne prime, A000668(13); 521 = A000043(13). - _M. F. Hasler_, Jan 09 2013
%H Arkadiusz Wesolowski, <a href="/A169685/b169685.txt">Table of n, a(n) for n = 157..313</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>
%e 686479766013060971498190079908139321726943530014330540939446345918\
%e 554318339765605212255964066145455497729631139148085803712198799971\
%e 6643812574028291115057151.
%t IntegerDigits[2^521-1] (* _Paolo Xausa_, Oct 07 2023 *)
%o (Magma) Reverse(Intseq(2^521-1)); // _Arkadiusz Wesolowski_, Oct 18 2014
%Y Cf. A169684 = A000668(11), A169681 = A000668(12), A204063 = A000668(14), 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 157,1
%A _N. J. A. Sloane_, Apr 13 2010