login
A075578
Smaller of two successive 4th powers whose sum is a prime.
0
1, 16, 81, 256, 1296, 4096, 6561, 20736, 28561, 38416, 65536, 390625, 456976, 531441, 923521, 1185921, 1336336, 1679616, 1874161, 2085136, 2560000, 3418801, 5308416, 8503056, 15752961, 20151121, 21381376, 26873856, 29986576, 37015056
OFFSET
0,2
MAPLE
s := 0:for i from 1 to 200 do if(isprime(i^4+(i+1)^4)) then s := s+1:a[s] := i^4:fi:od:seq(a[k], k=1..s);
MATHEMATICA
Transpose[Select[Partition[Range[100]^4, 2, 1], PrimeQ[Total[#]]&]][[1]] (* Harvey P. Dale, Sep 19 2011 *)
CROSSREFS
Sequence in context: A014188 A352050 A050463 * A113316 A113317 A187457
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Sep 25 2002
EXTENSIONS
More terms from Sascha Kurz, Jan 26 2003
STATUS
approved