A182347 Primes of the form k^4 - 2.
79, 2399, 14639, 28559, 194479, 707279, 2313439, 2825759, 3418799, 5764799, 7890479, 12117359, 28398239, 47458319, 52200623, 57289759, 81450623, 96059599, 104060399, 200533919, 276922879, 395254159, 418161599, 937890623, 1073283119, 1171350623, 1275989839
Offset: 1
Keywords
Examples
79 = 3^4 - 3; 2399 = 7^4 - 3.
Links
- Frank M Jackson, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A037896.
Programs
-
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
lst = {}; Do[If[PrimeQ[r=(2k+1)^4-2], AppendTo[lst, r]], {k, 1, 1000}]; lst[[1;;100]]