OFFSET
1,1
EXAMPLE
2 is in this sequence because 2^3 - 6 = 2 and 2 is prime.
MATHEMATICA
Select[Prime[Range[10^3]], PrimeQ[#^3 - 6] &] (* Vincenzo Librandi, Oct 21 2014 *)
PROG
(Magma) [p: p in PrimesUpTo(5000) | IsPrime(p^3-6)];
(PARI) forprime(p=1, 5000, if(isprime(p^3-6), print1(p, ", "))) \\ Derek Orr, Oct 21 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, Oct 09 2014
STATUS
approved