OFFSET
1,1
COMMENTS
Apart from 3, this is a subsequence of A053786. - Bruno Berselli, Apr 26 2012
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
EXAMPLE
2 = 0^4 + 2;
3 = 1^4 + 2;
83 = 3^4 + 2.
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 *)
PROG
(Magma) [2, 3] cat [n^4+2: n in [3..600 by 6]|IsPrime(n^4+2)]; // Bruno Berselli, Apr 26 2012
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Patrick Devlin, Apr 25 2012
STATUS
approved