login
A091122
Number of primes of the form 7k+3 less than 10^n.
5
1, 5, 30, 209, 1613, 13105, 110815, 960213, 8475123, 75843438, 686338138, 6267994788, 57677618350, 534157031248
OFFSET
1,2
COMMENTS
Computed by T. D. Noe, Dec 19 2003
LINKS
Eric Weisstein's World of Mathematics, Modular Prime Counting Function
MATHEMATICA
p = Select[Table[7 i + 3, {i, 0, 10^7}], PrimeQ[#] &]; Table[Count[p, x_ /; x < 10^n], {n, 7}] (* Robert Price, May 28 2019 *)
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Eric W. Weisstein, Dec 19 2003
EXTENSIONS
a(10) from Robert G. Wilson v, Dec 22 2003
a(11)-a(14) from Hiroaki Yamanouchi, Oct 14 2014
STATUS
approved