%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