A075578 Smaller of two successive 4th powers whose sum is a prime.

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

Links

Table of n, a(n) for n=0..29.

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

Adjacent sequences: A075575 A075576 A075577 * A075579 A075580 A075581

Keyword

nonn

Author

Amarnath Murthy, Sep 25 2002

Extensions

More terms from Sascha Kurz, Jan 26 2003

Status

approved