OFFSET
1,1
PROG
(Magma) &cat[ [p, q]: p in PrimesUpTo(4000) | P[1] eq 9 and Q[1] eq 7 where P is Intseq(p) where Q is Intseq(q) where q is NextPrime(p) ]; // Klaus Brockhaus, Jan 01 2011
CROSSREFS
KEYWORD
nonn,base,less
AUTHOR
Vincenzo Librandi, Dec 29 2010
EXTENSIONS
Corrected (2789, 2857 removed) by Klaus Brockhaus, Jan 01 2011
STATUS
approved