OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
a(3) = 127 is a term because 127, 5*127+6 = 641, 5*p+12 = 647, 5*p+18 = 653 and 5*p+24 = 659 are all prime.
MAPLE
select(p -> andmap(isprime, [p, 5*p+6, 5*p+12, 5*p+18, 5*p+24]), [seq(i, i=3..200000, 2)]);
MATHEMATICA
Select[Prime[Range[13000]], And @@ PrimeQ[5*# + 6*Range[4]] &] (* Amiram Eldar, Jul 08 2022 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
J. M. Bergot and Robert Israel, Jul 08 2022
STATUS
approved