|
%I #11 May 23 2020 03:11:27
%S 2,2,2,1,3,2,3,2,3,6,5,7,8,6,6,9,11,9,11,11,9,11,11,13,17,16,14,14,11,
%T 11,21,20,22,19,25,22,23,25,24,25,27,24,29,26,26,23,30,37,36,33,32,34,
%U 31,36,37,38,39,35,36,35,32,37,46,45,42,40,49,50,55
%N a(n) = round(prime(n) - n*log(n)).
%H Harry J. Smith, <a href="/A064659/b064659.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) ~ n*log(log(n)) * (1 + 1/log(n) - 1/log(log(n)) - 2/(log(n)*log(log(n)))). - _Vaclav Kotesovec_, May 23 2020
%o (PARI) { default(realprecision, 100); for (n = 1, 1000, write("b064659.txt", n, " ", round(prime(n) - n*log(n))); ) } \\ _Harry J. Smith_, Jun 25 2009
%Y Cf. A064658, A059111.
%K nonn
%O 1,1
%A _N. J. A. Sloane_, Oct 10 2001
|
