login
A182347
Primes of the form k^4 - 2.
1
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,1
LINKS
EXAMPLE
79 = 3^4 - 3; 2399 = 7^4 - 3.
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]]
CROSSREFS
Cf. A037896.
Sequence in context: A098104 A061997 A094731 * A293919 A205496 A017795
KEYWORD
nonn
AUTHOR
Patrick Devlin, Apr 25 2012
STATUS
approved