OFFSET
1,1
PROG
(PARI) { my(p=2, q=3); while(p<510, my(a=2*p-q+2); if(isprime(a), print1(a, ", ")); p=q; q=nextprime(q+1)) } \\ Klaus Brockhaus, Nov 28 2006
CROSSREFS
KEYWORD
nonn
AUTHOR
Giovanni Teofilatto, Nov 28 2006
EXTENSIONS
Corrected and extended by Klaus Brockhaus, Nov 28 2006
STATUS
approved
