|
%I #9 Dec 17 2022 01:45:17
%S 1,0,6,7,7,1,8,4,0,1,9,4,6,6,9,3,5,7,5,8,6,5,9,0,3,0,7,6,5,6,3,6,2,2,
%T 7,5,8,1,7,6,7,9,0,5,6,5,2,6,6,8,7,4,8,3,8,9,2,9,7,9,0,9,9,4,4,8,5,1,
%U 3,9,7,4,3,6,2,5,5,3,6,2,0,2,8,9,6,6,8,1,8,3,7,3,2,8,0
%N Decimal expansion of Integral_{x=0..1} ([1/x]^(-1) + {1/x}) dx, where [x] denotes the integer part of x and {x} the fractional part of x.
%H Vincent Pantaloni, <a href="https://people.missouristate.edu/lesreid/adv_133_pantaloni.pdf">Solution</a>, Missouri State University’s Advanced Problem of February 2010.
%F Equals Pi^2/6 - gamma.
%F Equals zeta(2) - gamma.
%F Equals A013661 - A001620.
%e 1.06771840194669357586590307656362275817679...
%p Digits := 110: evalf(Pi^2/6 - gamma, Digits)*10^94:
%p ListTools:-Reverse(convert(floor(%), base, 10));
%Y Cf. A013661, A001620.
%K nonn,cons
%O 1,3
%A _Peter Luschny_, Dec 16 2022
|
