OFFSET
1,2
COMMENTS
All terms == 1 or 5 (mod 6). - Robert Israel, Oct 29 2020
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
select(n -> isprime(n+6) and isprime(6*n+1), [seq(i, i=1..1000, 2)]); # Robert Israel, Oct 29 2020
MATHEMATICA
Select[Range[551], PrimeQ[#+6]&&PrimeQ[6#+1]&] (* James C. McMahon, Sep 26 2024 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Jun 10 2006
STATUS
approved