OFFSET
1,1
PROG
(PARI) isok(p) = {if (! isprime(p), return (0)); lcmv = lcm(vector(p, i, i)); isprime(lcmv + 1) && isprime(lcmv - 1); } \\ Michel Marcus, Oct 26 2013
CROSSREFS
KEYWORD
more,nonn
AUTHOR
Lekraj Beedassy, Jan 11 2009
STATUS
approved