OFFSET
1,1
LINKS
V. Raman, Table of n, a(n) for n = 1..10000 (first 1000 terms from Harvey P. Dale)
MATHEMATICA
m3Q[m_]:=Module[{c=10m}, Count[{c+1, c+3, c+7, c+9}, _?PrimeQ]==3]; Select[ Range[ 600], m3Q] (* Harvey P. Dale, Dec 24 2011 *)
PROG
(Magma) [n: n in [1..600] | #PrimesInInterval(10*n+1, 10*n+9) eq 3]; // Bruno Berselli, Sep 04 2012
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved