OFFSET
1,1
PROG
(PARI) pipprimes(n, m) = { for(x=1, n, c=0; p1 = prime(prime(x)); p2 = prime(prime(x+1)); forprime(y=p1+2, p2-2, c++); if(c==m, forprime(y=p1+2, p2-2, print1(y", "); ); ) ) }
CROSSREFS
KEYWORD
nonn
AUTHOR
Cino Hilliard, Nov 01 2003
STATUS
approved