OFFSET
1,1
COMMENTS
LINKS
Zak Seidov, Table of n, a(n) for n = 1..1000
PROG
(PARI) A210683(n, p=2, v=1, g=60, c, o)={forprime(q=p+1, , if(p+g!=p=q, next, q!=o+2*g, c=2, c++>3, v&& print1(o-g", "); n--||break); o=q-g); o-g} \\ Can be used as next(p)=A210683(1, p) to get the next term, e.g.:
p=0; A210683_vec=vector(10, i, p=A210683(1, p)) \\ Will take a long time! - M. F. Hasler, Oct 26 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, May 09 2012
STATUS
approved