OFFSET
1,1
PROG
(PARI) my(q=3, r=2, s=0); forprime(p=5, default(primelimit), (s+=sign(r+0-2*(r=q)+q=p))||print1(r, ", "))
CROSSREFS
KEYWORD
nonn
AUTHOR
G. L. Honaker, Jr., Dec 02 2010
EXTENSIONS
More terms from Chris K. Caldwell
STATUS
approved