|
%I #19 Sep 02 2018 04:03:53
%S 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,
%T 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,
%U 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
%N Decimal expansion of the logarithm of the generalized Glaisher-Kinkelin constant A(3) (negated).
%C The logarithm of the third Bendersky constant.
%H G. C. Greubel, <a href="/A271170/b271170.txt">Table of n, a(n) for n = 0..2000</a>
%F Equals (Bernoulli(4)/4)*(EulerGamma + log(2*Pi) - (Zeta'(4)/Zeta(4))).
%F log(A(3)) = HarmonicNumber(3)*Bernoulli(4)/4 - Zeta'(-3).
%e -0.02065635413555207892219475198819162067344221752007...
%t Join[{0}, RealDigits[(BernoulliB[4]/4)*(EulerGamma + Log[2*Pi] - Zeta'[4]/Zeta[4]), 10, 100] // First]
%Y log(A(b)): A225746 (b=1), (-1) * A240966 (b=2).
%Y Cf. A243263, A259068.
%K nonn,cons
%O 0,2
%A _G. C. Greubel_, Apr 01 2016
|
