%I #14 May 29 2019 07:47:02
%S 0,3,26,202,1601,13069,110776,960085,8474021,75841922,686340737,
%T 6267984796,57677570801,534156825708
%N Number of primes of the form 7k+4 less than 10^n.
%C Computed by _T. D. Noe_, Dec 19 2003.
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/ModularPrimeCountingFunction.html">Modular Prime Counting Function</a>
%t p = Select[Table[7 i + 4, {i, 0, 10^7}], PrimeQ[#] &]; Table[Count[p, x_ /; x < 10^n], {n, 7}] (* _Robert Price_, May 28 2019 *)
%Y Cf. A091120, A091121, A091122, A091124, A091125.
%K nonn,more
%O 1,2
%A _Eric W. Weisstein_, Dec 19 2003
%E a(10) from _Robert G. Wilson v_, Dec 22 2003
%E a(11)-a(14) from _Hiroaki Yamanouchi_, Oct 14 2014
|