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!)
A131688 Decimal expansion of the constant Sum_{k>=1} log(k+1)/k/(k+1). 11
1, 2, 5, 7, 7, 4, 6, 8, 8, 6, 9, 4, 4, 3, 6, 9, 6, 3, 0, 0, 0, 9, 8, 9, 9, 8, 3, 0, 4, 9, 5, 8, 8, 1, 5, 2, 8, 5, 1, 1, 5, 4, 0, 8, 9, 0, 5, 0, 8, 8, 8, 4, 8, 6, 8, 9, 7, 7, 5, 4, 0, 8, 3, 3, 5, 2, 2, 5, 4, 9, 9, 9, 4, 8, 9, 3, 7, 4, 4, 9, 3, 4, 9, 7, 0, 7, 9, 0, 4, 7, 3, 1, 5, 0, 1, 9, 0, 9, 7, 8, 2, 4, 5, 4, 8 (list; constant; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

Equals Sum[ -Zeta'[1 + k], {k, 1, Infinity}], where Zeta' is the derivative of Riemann Zeta function. - Vladimir Reshetnikov, Dec 28 2008

Given A131385(n) = Product_{k=1..n} floor((n+k)/k), then limit A131385(n+1)/A131385(n) = exp(c), where c = this constant. - Paul D. Hanna, Nov 26 2012

Closely related to A085361 (the exponent in the definition of A085291). - Yuriy Sibirmovsky, Sep 04 2016

REFERENCES

Steven R. Finch, Mathematical Constants, Cambridge University Press, 2003, page 62. [Jean-François Alcover, Mar 21 2013]

LINKS

G. C. Greubel, Table of n, a(n) for n = 1..1000

Mark W. Coffey, Series of zeta values, the Stieltjes constants and a sum S_gamma(n), arXiv:math-ph/0706.0345, 2007-2009, eq (38a).

Paul Erdős, S. W. Graham, Aleksandar Ivic and Carl Pomerance, On the number of divisors of n!,  Analytic Number Theory, Volume 138, Progress in Mathematics pp 337-355.

Steven R. Finch, Mathematical Constants II, Encyclopedia of Mathematics and Its Applications, Cambridge University Press, Cambridge, 2018, p. 538.

Sofia Kalpazidou, Khintchine's constant for Lüroth representation, Journal of Number Theory, Volume 29, Issue 2, June 1988, Pages 196-205.

FORMULA

Equals Sum_{s>=1} (-1)^(s+1)*zeta(s+1)/s.

Also equals Sum_{s>=1} log(1+1/s)/s. - Jean-François Alcover, Mar 26 2013

Equals Integral_{t=0..1} H(t)/t dt. Compare to A001620 = Integral_{t=0..1} H(t) dt. Where H(t) are generalized harmonic numbers. - Yuriy Sibirmovsky, Sep 04 2016

Equals lim_{n->oo} log(d(n!))*log(n)/n, where d(n) is the number of divisors of n (A000005) (Erdős et al., 1996). - Amiram Eldar, Nov 07 2020

Equals -Sum_{k>=2} zeta'(k). - Vaclav Kotesovec, Jun 17 2021

EXAMPLE

1.257746886944369630009899830495881528511540890508884868977540833522...

MAPLE

evalf(sum((-1)^(n+1)*Zeta(n+1)/n, n=1..infinity), 120); # Vaclav Kotesovec, Dec 11 2015

evalf(Sum(-Zeta(1, k), k = 2..infinity), 120); # Vaclav Kotesovec, Jun 18 2021

MATHEMATICA

Sum[ -Zeta'[1 + k], {k, 1, Infinity}] (* Vladimir Reshetnikov, Dec 28 2008 *)

Integrate[EulerGamma/x + PolyGamma[0, 1+x]/x, {x, 0, 1}] // N[#, 105]& // RealDigits[#][[1]]& (* or *) Integrate[x*Log[x]/((1-x)*Log[1-x]), {x, 0, 1}] // N[#, 105]& // RealDigits[#][[1]]& (* Jean-François Alcover, Feb 04 2013 *)

$MaxExtraPrecision = 200; NIntegrate[HarmonicNumber[t]/t, {t, 0, 1}, WorkingPrecision -> 105] (* Yuriy Sibirmovsky, Sep 04 2016 *)

digits = 120; RealDigits[NSum[(-1)^(n + 1)*Zeta[n + 1]/n, {n, 1, Infinity}, NSumTerms -> 20*digits, WorkingPrecision -> 10*digits, Method -> "AlternatingSigns"], 10, digits][[1]] (* G. C. Greubel, Nov 15 2018 *)

PROG

(PARI) sumalt(s=1, (-1)^(s+1)/s*zeta(s+1) )

(PARI) suminf(k=2, -zeta'(k)) \\ Vaclav Kotesovec, Jun 17 2021

(Magma) SetDefaultRealField(RealField(100)); L:=RiemannZeta(); (&+[(-1)^(n+1)*Evaluate(L, n+1)/n: n in [1..10^3]]); // G. C. Greubel, Nov 15 2018

(Sage) numerical_approx(sum((-1)^(k+1)*zeta(k+1)/k for k in [1..1000]), digits=100) # G. C. Greubel, Nov 15 2018

CROSSREFS

Cf. A000005, A002210, A027423, A075887, A131385, A244109, A001620, A085361, A345682.

Sequence in context: A325437 A141430 A021392 * A226213 A199590 A096624

Adjacent sequences:  A131685 A131686 A131687 * A131689 A131690 A131691

KEYWORD

cons,nonn

AUTHOR

R. J. Mathar, Sep 14 2007

EXTENSIONS

Extended to 105 digits by Jean-François Alcover, Feb 04 2013

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 September 28 14:44 EDT 2022. Contains 357073 sequences. (Running on oeis4.)