OFFSET
2,1
EXAMPLE
a(5) = 13001 because the smallest 5-digit prime quadruplet is {13001, 13003, 13007, 13009}
MATHEMATICA
s={}; Do[m=10^(n-1)+1; While[!AllTrue[{m, m+2, m+6, m+8}, PrimeQ], m=m+10]; AppendTo[s, m], {n, 2, 18}]; s (* James C. McMahon, Apr 16 2025 *)
CROSSREFS
KEYWORD
base,nonn,more
AUTHOR
Julien Peter Benney (jpbenney(AT)gmail.com), Feb 23 2008
EXTENSIONS
a(9)-a(18) from Donovan Johnson, May 23 2010
STATUS
approved
