%I #10 Dec 01 2024 10:54:00
%S 7,7,1,1,2,5,5,2,3,6,5,5,6,5,8,9,0,9,3,1,7,3,1,7,7,6,3,2,7,7,7,0,6,8,
%T 8,5,9,2,1,6,7,8,3,8,8,2,1,1,3,6,1,2,3,2,6,2,6,9,2,6,0,0,9,6,3,5,4,7,
%U 4,7,4,0,9,1,4,9,1,8,6,0,3,8,9,3,7,2,3,9,4,0,1,4,6,9,1,2,6,5,5,9,3,6,8,9
%N Decimal expansion of the trace of the Ruelle-Mayer linear operator G_2.
%D Steven R. Finch, Mathematical Constants, Cambridge University Press, 2003, Sections 2.17.1 Ruelle-Mayer Operators, p. 153.
%F Equals 1/2 - 1/(2*sqrt(5)) + (1/2)*Sum_{k>0} (-1)^(k-1)*binomial(2*k,k)*(zeta(2*k)-1).
%e 0.7711255236556589093173177632777...
%t NIntegrate[BesselJ[1, 2*x]/(Exp[x]-1), {x, 0, Infinity}, WorkingPrecision -> 140] // RealDigits[#, 10, 80]& // First
%Y Cf. A007515, A038517.
%K nonn,cons
%O 0,1
%A _Jean-François Alcover_, May 26 2014