A182343 Primes of the form k^4 + 2 for k >= 0.
2, 3, 83, 6563, 50627, 194483, 4100627, 10556003, 15752963, 22667123, 57289763, 96059603, 276922883, 395254163, 6059221283, 6597500627, 12296370323, 14166950627, 42110733683, 44386483763, 46753250627, 49213429283, 69257922563, 72555348323
Offset: 1
Examples
2 = 0^4 + 2; 3 = 1^4 + 2; 83 = 3^4 + 2.
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Magma
[2,3] cat [n^4+2: n in [3..600 by 6]|IsPrime(n^4+2)]; // Bruno Berselli, Apr 26 2012
-
Maple
# choose N large, then S is the desired set f:=n->n^4 + 2: S:={}: for n from 0 to N do if(isprime(f(n))) then S:=S union {f(n)}: fi: od: -
Mathematica
Select[Range[0,600]^4 + 2,PrimeQ] (* Bruno Berselli, Apr 26 2012 *)
Comments