OFFSET
1,31
COMMENTS
Partial sums of A185705.
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..5000
A. Granville and G. Martin, Prime number races, arXiv:math/0408319 [math.NT], 2004.
A. Granville and G. Martin, Prime number races, Amer. Math. Monthly, 113 (No. 1, 2006), 1-33.
MATHEMATICA
Accumulate[Table[If[PrimeQ[n]&&Mod[n, 10]==1, 1, 0], {n, 120}]] (* Harvey P. Dale, May 30 2016 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
N. J. A. Sloane, Feb 10 2011
STATUS
approved