OFFSET
1,1
COMMENTS
LINKS
David Baugh, Table of n, a(n) for n = 1..100
Chris K. Caldwell, How Many Primes Are There?
Eric Weisstein's World of Mathematics, Prime Counting Function
Eric Weisstein's World of Mathematics, Prime Number Theorem
MATHEMATICA
f[n_Integer] := Sum[N[MoebiusMu[k]*HarmonicNumber[k]/k^(3/2)*LogIntegral[n^(1/k)], 50], {k, 5!}]; Table[Round[f[10^n]], {n, 20}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Arkadiusz Wesolowski, Aug 31 2013
STATUS
approved