OFFSET
7,1
PROG
(PARI) \ r is the occurrence desired 1=first, 2=second etc. \d is the amount we take from q diff2sqp2(n, r, d) = { forprime(q=d+1, n, c=0; forprime(p=q+1, n, y=(p-q)/(q-d); if(y==floor(y), if(isprime(y), c++; if(c==r, print1(y", "); break)) ) ) ) }
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Cino Hilliard, Dec 28 2003
STATUS
approved