login
Number of primes less than or equal to Pi^n.
3

%I #18 Oct 09 2020 03:49:17

%S 0,2,4,11,25,62,162,433,1175,3229,9042,25549,73050,210356,610041,

%T 1779830,5218745,15372304,45455747,134882577,401480918,1198344171,

%U 3585783711,10754085805,32319203663,97312548674,293515297707,886720888966,2682778745396,8127887397064

%N Number of primes less than or equal to Pi^n.

%H David Baugh, <a href="/A071973/b071973.txt">Table of n, a(n) for n = 0..52</a> (terms n = 27..52 found using Kim Walisch's primecount program)

%H <a href="/index/Pri#primepop">Index entries for sequences related to numbers of primes in various ranges</a>

%F a(n) = A000720(A001672(n)). - _Michel Marcus_, Oct 05 2020

%t Do[ Print[ PrimePi[Pi^n]], {n, 0, 28}]

%o (PARI) a(n) = primepi(Pi^n); \\ _Michel Marcus_, Oct 05 2020

%Y Cf. A000720, A001672, A061274.

%K hard,nonn

%O 0,2

%A _Robert G. Wilson v_, Jun 18 2002

%E a(27)-a(29) from _David Baugh_, Oct 05 2020