[go: up one dir, main page]

login
A330820
Numbers of the form (M_p^2-1)^2, where M_p is a Mersenne prime, A000668. Also the second element of the power-spectral basis of A330817.
10
64, 2304, 921600, 260112384, 4501400872550400, 295138898048817561600, 75557287266261531623424
OFFSET
1,1
COMMENTS
The first element of the power-spectral basis of A330817 is A330819.
FORMULA
a(n) = (A000668(n)^2-1)^2.
EXAMPLE
If n=1, a(1)=(3^2-1)^2=64.
MAPLE
A330820:=[]:
for www to 1 do
for i from 1 to 31 do
#ithprime(31)=127
p:=ithprime(i);
q:=2^p-1;
if isprime(q) then x:=(q^2-1)^2; A330820:=[op(A330820), x] fi;
od;
od;
MATHEMATICA
Array[((2^MersennePrimeExponent[#] - 1)^2 - 1)^2 &, 10] (* Amiram Eldar, Jan 07 2020 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Walter Kehowski, Jan 06 2020
STATUS
approved