OFFSET
1,1
COMMENTS
Prime sums of three consecutive fourth powers, since 3*n^4+12*n^2+2 = (n-1)^4+n^4+(n+1)^4.
Primes in A160827.
EXAMPLE
2^4+3^4+4^4 = 353 is prime and therefore in the sequence.
MATHEMATICA
lst={}; Do[If[PrimeQ[p=(n+1)^4+n^4+ (n-1)^4], AppendTo[lst, p]], {n, 100}]; lst
lst={}; Do[If[PrimeQ[p=3*n^4+12*n^2+2], AppendTo[lst, p]], {n, 100}]; lst
PROG
(Magma) [ p: n in [0..300] | IsPrime(p) where p is n^4+(n+1)^4+(n+2)^4 ];
CROSSREFS
KEYWORD
nonn
AUTHOR
Rafael Parra Machio, Jun 07 2011
STATUS
approved