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
Keywords
Examples
2^4+3^4+4^4 = 353 is prime and therefore in the sequence.
Crossrefs
Cf. A160827.
Programs
-
Magma
[ p: n in [0..300] | IsPrime(p) where p is n^4+(n+1)^4+(n+2)^4 ];
-
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
Comments