OFFSET
1,1
COMMENTS
For p > 2, p^2 + 24 is composite (divisible by 5). - Zak Seidov, Sep 07 2018
LINKS
Zak Seidov, Table of n, a(n) for n = 1..1800
MATHEMATICA
okQ[n_]:=Module[{p2=n^2}, And@@PrimeQ[{p2+6, p2+12, p2+18}]]; Select[Prime[Range[30000]], okQ] (* Harvey P. Dale, Dec 18 2010 *)
PROG
(Magma)[p: p in PrimesUpTo(600000)|IsPrime(p^2+6) and IsPrime(p^2+12) and IsPrime(p^2+18)] // Vincenzo Librandi, Dec 13 2010
(PARI) isok(p) = isprime(p) && isprime(p^2+6) && isprime(p^2+12) && isprime(p^2+18); \\ Michel Marcus, Sep 08 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Nov 09 2010
STATUS
approved