OFFSET
1,1
COMMENTS
All terms are divisible by 3. - Robert Israel, Apr 07 2019
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
select(t -> isprime(10*t+1) and isprime(10*t-1), [seq(i, i=3..1000, 3)]); # Robert Israel, Apr 07 2019
MATHEMATICA
Select[Range[678], And @@ PrimeQ[{-1, 1} + 10# ] &] (* Ray Chandler, Nov 16 2006 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Artur Jasinski, Nov 04 2006
STATUS
approved