# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a089502 Showing 1-1 of 1 %I A089502 #4 Oct 01 2013 17:57:55 %S A089502 17,13,17,13,17,41,31,53,53,17,71,13,13,23,41,107,17,41,71,17,13,23, %T A089502 23,53,13,83,47,17,31,23,47,47,11,31,31,41,41,41,23,41,13,31,23,23,23, %U A089502 17,13,13,13 %N A089502 Fifth occurrence where (p-q)/(q-5), p and q are primes. %o A089502 (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)) ) ) ) } %K A089502 easy,nonn %O A089502 7,1 %A A089502 _Cino Hilliard_, Dec 28 2003 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE