|
%I #11 Jun 12 2024 15:57:53
%S 1,4,9,1,4,3,3,9,7,5,6,9,9,9,3,1,6,3,6,7,7,1,5,4,0,1,5,1,8,2,2,7,2,0,
%T 7,1,0,0,9,4,3,7,5,1,6,7,9,5,0,3,1,9,0,6,7,6,5,0,8,5,0,0,1,1,8,6,6,7,
%U 4,2,0,2,7,4,6,2,1,1,8,3,9,4,5,0,7,3
%N Decimal expansion of (1 + log(4))/16.
%F Equals Integral_{x=2..oo} log(x)/x^3 dx.
%e 0.149143397569993163677154015182272071009437516795031...
%t s = Integrate[Log[x]/x^3, {x, 2, Infinity}]
%t d = N[s, 100]
%t First[RealDigits[d]]
%t N[1/16 (1 + Log[4]), 100]
%Y Cf. A372858, A372860, A372861.
%K nonn,cons
%O 0,2
%A _Clark Kimberling_, Jun 09 2024
|
