A271170 Decimal expansion of the logarithm of the generalized Glaisher-Kinkelin constant A(3) (negated).
0, 2, 0, 6, 5, 6, 3, 5, 4, 1, 3, 5, 5, 5, 2, 0, 7, 8, 9, 2, 2, 1, 9, 4, 7, 5, 1, 9, 8, 8, 1, 9, 1, 6, 2, 0, 6, 7, 3, 4, 4, 2, 2, 1, 7, 5, 2, 0, 0, 7, 3, 2, 8, 4, 8, 3, 7, 2, 2, 4, 8, 0, 1, 0, 0, 1, 1, 0, 2, 2, 7, 9, 7, 7, 5, 7, 0, 1, 8, 4, 7, 3, 6, 3, 8, 7, 2, 8, 8, 1, 6, 4, 8, 6, 0, 3
Offset: 0
Examples
-0.02065635413555207892219475198819162067344221752007...
Links
- G. C. Greubel, Table of n, a(n) for n = 0..2000
Programs
-
Mathematica
Join[{0}, RealDigits[(BernoulliB[4]/4)*(EulerGamma + Log[2*Pi] - Zeta'[4]/Zeta[4]), 10, 100] // First]
Formula
Equals (Bernoulli(4)/4)*(EulerGamma + log(2*Pi) - (Zeta'(4)/Zeta(4))).
log(A(3)) = HarmonicNumber(3)*Bernoulli(4)/4 - Zeta'(-3).
Comments