Logo

Greetings from The On-Line Encyclopedia of Integer Sequences!

Hints

Search: id:A057794
Displaying 1-1 of 1 results found. page 1
     Format: long | short | internal | text      Sort: relevance | references | number      Highlight: on | off
A057794 (Integer nearest R(10^n)) - pi(10^n), where pi(x) is the number of primes <= x, R(x) = Sum_{ k>=1 } (mu(k)/k * li(x^(1/k))) and li(x) is the Cauchy principal value of the integral from 0 to x of dt/log(t). +0
4
1, 1, 0, -2, -5, 29, 88, 97, -79, -1828, -2318, -1476, -5773, -19200, 73218, 327052, -598255, -3501366, 23884333, -4891825, -86432204, -127132665 (list; graph; listen)
OFFSET

1,4

COMMENT

This is Riemann's remarkable approximation for the number of primes <= x.

Equivalently, R(x) is given by the Gram series, 1 + sum of log(x)^k/(k*k!*zeta(k+1)) for k = 1 to infinity. This series converges more quickly.

REFERENCES

John H. Conway and R. K. Guy, "The Book of Numbers," Copernicus, an imprint of Springer-Verlag, NY, 1996, page 146.

M. du Sautoy, The Music of the Primes, Fourth Estate / HarperCollins, 2003; see p. 90.

LINKS

Tomas Oliveira e Silva, Tables of values of pi(x) and of pi2(x)

Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics.

Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics.

Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics.

MATHEMATICA

R[x_] := Sum[N[LogIntegral[x^(1/k)]*MoebiusMu[k]/k, 36], {k, 1, 1000}]; a[n_] := Abs[Round[R[10^n]-PrimePi[10^n]]]

gram[x_] := 1+Sum[N[Log[x]^k/(k*k!*Zeta[k+1]), 100], {k, 1, 1000}]; a[n_] := Abs[Round[gram[10^n]-PrimePi[10^n]]]

PROGRAM

(PARI) A057794=vector(#A006880, i, round(1+suminf(k=1, log(10^i)^k/(k*k!*zeta(k+1)))-A006880[i])) \\ - M. F. Hasler (MHasler(AT)univ-ag.fr), Feb 26 2008

CROSSREFS

Cf. A006880, A057752.

Sequence in context: A061351 A126107 A083472 this_sequence A073715 A104083 A132282

Adjacent sequences: A057791 A057792 A057793 this_sequence A057795 A057796 A057797

KEYWORD

sign

AUTHOR

Robert G. Wilson v (rgwv(AT)rgwv.com), Nov 04 2000

EXTENSIONS

First term corrected by David Baugh (dbaugh(AT)owlnet.rice.edu), Nov 15 2002

Signs added by M. F. Hasler, Feb 26 2008

The value of a(23) is not known at present, I believe. - N. J. A. Sloane (njas(AT)research.att.com), Mar 17 2008

page 1

Search completed in 0.002 seconds

Lookup | Welcome | Find friends | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
More pages | Superseeker | Maintained by N. J. A. Sloane (njas@research.att.com)

Last modified November 29 12:46 EST 2009. Contains 167659 sequences.


AT&T Labs Research