OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Vincenzo Librandi)
EXAMPLE
3 is a term since 3^3 + 2 = 29 is prime.
MATHEMATICA
Prime[ Select[ Range[ 500], PrimeQ[Prime[ # ]^3 + 2] &] ]
Select[Prime[Range[400]], PrimeQ[#^3 + 2]&] (* Vincenzo Librandi, Apr 11 2013 *)
PROG
(Magma) [p: p in PrimesUpTo(3000) | IsPrime(p^3+2)]; // Vincenzo Librandi, Apr 11 2013
(PARI) forprime(p=2, 3000, if(isprime(p^3+2), print1(p, ", "))) \\ Hugo Pfoertner, Oct 30 2018
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
EXTENSIONS
More terms from Robert G. Wilson v, Dec 04 2000
STATUS
approved