OFFSET
1,1
COMMENTS
Some of these are prime quadruples, but some are not. Call them unrestricted prime quadruples.
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
Eric Weisstein's World of Mathematics, Prime Quadruplet
MATHEMATICA
Select[Partition[Prime[Range[300]], 4, 1], #[[4]]-#[[3]]==#[[2]]-#[[1]]==2&]//Flatten (* Harvey P. Dale, Feb 10 2025 *)
PROG
(PARI) {forprime(p1=0, 3000, p2=p1+2; if(!isprime(p2), next; ); forprime(p3=p2+1, 6000, p4=p3+2; if(isprime(p4), print1(p1, ", ", p2, ", ", p3, ", ", p4, ", ")); break; ))}
CROSSREFS
KEYWORD
nonn
AUTHOR
Harry J. Smith, Dec 16 2007
STATUS
approved