OFFSET
1,1
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
PROG
(PARI) ok(t)=my(p=2); forprime(q=3, nextprime(t/2), if(t%q==p, return(0)); p=q); 1
select(ok, primes(100)) \\ Charles R Greathouse IV, Mar 13 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Feb 07 2009
STATUS
approved