login
A191589
Primes of the form 3*n^4+12*n^2+2, n > 0.
0
17, 353, 7793, 45377, 588737, 1603073, 2131937, 2782097, 23705153, 27488177, 36393857, 142457633, 156688577, 288296417, 423617057, 780627473, 830968337, 938914433, 1254730193, 5724613457, 9150064577, 13500386657, 15247220033
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
Cf. A160827.
Sequence in context: A137246 A171860 A324449 * A194729 A081421 A121824
KEYWORD
nonn
AUTHOR
Rafael Parra Machio, Jun 07 2011
STATUS
approved