OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Vincenzo Librandi)
EXAMPLE
a(2) = 127 = 5^3 + 2 and 5 is prime.
MATHEMATICA
lst={}; Do[s=Prime[n]^3; If[PrimeQ[p=s+2], AppendTo[lst, p]], {n, 6!}]; lst (* Vladimir Joseph Stephan Orlovsky, Sep 26 2008 *)
PROG
(PARI) forprime (p=2, 1100, if(isprime(p^3+2), print1(p^3+2, ", "))) \\ Hugo Pfoertner, Oct 30 2018
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
STATUS
approved