The OEIS mourns the passing of Jim Simons and is grateful to the Simons Foundation for its support of research in many branches of science, including the OEIS.
login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A085968 Decimal expansion of the prime zeta function at 8. 21
0, 0, 4, 0, 6, 1, 4, 0, 5, 3, 6, 6, 5, 1, 7, 8, 3, 0, 5, 6, 0, 5, 2, 3, 4, 3, 9, 1, 4, 2, 6, 8, 3, 0, 8, 0, 5, 2, 2, 9, 7, 7, 1, 4, 4, 5, 1, 2, 0, 7, 1, 7, 4, 1, 0, 0, 1, 0, 3, 2, 6, 8, 8, 6, 8, 1, 7, 2, 8, 6, 3, 0, 4, 0, 7, 0, 7, 8, 8, 0, 4, 4, 0, 6, 0, 9, 2, 2, 8, 2, 8, 0, 5, 3, 0, 4, 3, 1, 3, 4, 4, 2, 6, 5, 6 (list; constant; graph; refs; listen; history; text; internal format)
OFFSET
0,3
COMMENTS
Mathar's Table 1 (cited below) lists expansions of the prime zeta function at integers s in 10..39. - Jason Kimberley, Jan 07 2017
REFERENCES
Henri Cohen, Number Theory, Volume II: Analytic and Modern Tools, GTM Vol. 240, Springer, 2007; see pp. 208-209.
J. W. L. Glaisher, On the Sums of Inverse Powers of the Prime Numbers, Quart. J. Math. 25, 347-362, 1891.
LINKS
Henri Cohen, High-precision computation of Hardy-Littlewood constants. [pdf copy, with permission]
X. Gourdon and P. Sebah, Some Constants from Number theory
R. J. Mathar, Series of reciprocal powers of k-almost primes, arXiv:0803.0900 [math.NT], 2008-2009. Table 1.
Eric Weisstein's World of Mathematics, Prime Zeta Function
FORMULA
P(8) = Sum_{p prime} 1/p^8 = Sum_{n>=1} mobius(n)*log(zeta(8*n))/n.
Equals Sum_{k>=1} 1/A179645(k). - Amiram Eldar, Jul 27 2020
EXAMPLE
0.0040614053665178305605...
MATHEMATICA
s[n_] := s[n] = Sum[ MoebiusMu[k]*Log[Zeta[8*k]]/k, {k, 1, n}] // RealDigits[#, 10, 104]& // First // Prepend[#, 0]&; s[100]; s[n = 200]; While[s[n] != s[n - 100], n = n + 100]; s[n] (* Jean-François Alcover, Feb 14 2013 *)
RealDigits[ PrimeZetaP[ 8], 10, 111][[1]] (* Robert G. Wilson v, Sep 03 2014 *)
PROG
(Magma) R := RealField(106);
PrimeZeta := func<k, N | &+[R|MoebiusMu(n)/n*Log(ZetaFunction(R, k*n)): n in[1..N]]>;
[0, 0] cat Reverse(IntegerToSequence(Floor(PrimeZeta(8, 43)*10^105)));
// Jason Kimberley, Dec 30 2016
(PARI) sumeulerrat(1/p, 8) \\ Hugo Pfoertner, Feb 03 2020
CROSSREFS
Decimal expansion of the prime zeta function: A085548 (at 2), A085541 (at 3), A085964 (at 4) to A085967 (at 7), this sequence (at 8), A085969 (at 9).
Sequence in context: A132953 A195207 A157721 * A353005 A010637 A200692
KEYWORD
cons,easy,nonn
AUTHOR
Antonio G. Astudillo (afg_astudillo(AT)lycos.com), Jul 06 2003
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified June 11 12:08 EDT 2024. Contains 373311 sequences. (Running on oeis4.)