OFFSET
1,1
COMMENTS
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..15
FORMULA
a(n) = A000668(n)^2
EXAMPLE
a(3)=961 because the 3rd Mersenne prime is 31 and 31^2=961.
MATHEMATICA
Select[2^Range[1000] - 1, PrimeQ]^2 (* G. C. Greubel, Oct 03 2017 *)
PROG
(PARI) forprime(p=2, 1000, if(ispseudoprime(2^p-1), print1((2^p-1)^2", "))) \\ G. C. Greubel, Oct 03 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Omar E. Pol, Oct 30 2007, Apr 23 2008
EXTENSIONS
More terms from Olaf Voß, Feb 13 2008
STATUS
approved