|
| |
|
|
A058290
|
|
Difference between 10^n/(Ln (10^n) - 1.08366) and Pi(10^n).
|
|
3
| |
|
|
-1, 4, 3, 4, 2, -4, 45, 561, 6549, 69985, 690493, 6545056, 60615397, 555560046, 5070271362, 46223804313, 421692578206, 3853431791690, 35289854434775, 323979090116197, 2981921009910364, 27516571651291205, 254562416350667928
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
REFERENCES
| Jan Gullberg, "Mathematics, From the Birth of Numbers," W.W. Norton and Company, NY and London, 1997, page 81.
|
|
|
LINKS
| Harry J. Smith, Table of n, a(n) for n=0,...,23
|
|
|
MATHEMATICA
| Table[ Round[ 10^n /(Log[10^n] - 1.08366) - PrimePi[10^n] ], {n, 0, 13} ]
|
|
|
PROG
| (PARI) f(n)= { if (n==0, return(0)); if (n==1, return(4)); if (n==2, return(25)); if (n==3, return(168)); if (n==4, return(1229)); if (n==5, return(9592)); if (n==6, return(78498)); if (n==7, return(664579)); if (n==8, return(5761455)); if (n==9, return(50847534)); if (n==10, return(455052511)); if (n==11, return(4118054813)); if (n==12, return(37607912018)); if (n==13, return(346065536839)); if (n==14, return(3204941750802)); if (n==15, return(29844570422669)); if (n==16, return(279238341033925));
if (n==17, return(2623557157654233)); if (n==18, return(24739954287740860)); if (n==19, return(234057667276344607)); if (n==20, return(2220819602560918840)); if (n==21, return(21127269486018731928)); if (n==22, return(201467286689315906290)); if (n==23, return(1925320391606803968923)); return(0); } { default(realprecision, 100); t=log(10); for (n=0, 23, write("b058290.txt", n, " ", round(10^n/(n*t - 1.08366)) - f(n)); ); } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), Jun 22 2009]
|
|
|
CROSSREFS
| Cf. A006880, A057752, A057794, A057835, A058289.
Sequence in context: A204819 A161882 A082125 * A002285 A106049 A136627
Adjacent sequences: A058287 A058288 A058289 * A058291 A058292 A058293
|
|
|
KEYWORD
| sign
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(AT)rgwv.com), Dec 07 2000
|
|
|
EXTENSIONS
| More terms from Harry J. Smith (hjsmithh(AT)sbcglobal.net), Jun 22 2009
|
| |
|
|
