A191589 Primes of the form 3*n^4+12*n^2+2, n > 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.

Links

Table of n, a(n) for n=1..23.

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

Adjacent sequences: A191586 A191587 A191588 * A191590 A191591 A191592

Keyword

nonn

Author

Rafael Parra Machio, Jun 07 2011

Status

approved