%I #29 Jan 07 2021 09:33:00
%S 1,4,3,6,7,4,6,3,6,6,8,8,3,6,8,0,9,4,6,3,6,2,9,0,2,0,2,3,8,9,3,5,8,3,
%T 3,5,4,2,4,9,9,5,6,4,3,5,6,5,4,8,7,2,1,0,2,6,6,7,2,4,3,9,2,4,8,6,5,0,
%U 1,5,7,8,9,2,7,7,3,9,7,7,9,7,5,4,3,7,3,7,8,6,7,1,5,5,0,6,8,8,9,0,1,0,1,3,3
%N Decimal expansion of a constant related to the asymptotics of A032302.
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/Dilogarithm.html">Dilogarithm</a>
%H Eric Weisstein's MathWorld, <a href="http://mathworld.wolfram.com/Polylogarithm.html">Polylogarithm</a>
%H Wikipedia, <a href="http://en.wikipedia.org/wiki/Polylogarithm">Polylogarithm</a>
%F Pi^2/12 + log(2)^2 + Sum_{j>=1} (1 / (j^2 * 2^(2*j+1)).
%F Equals Pi^2/6 + log(2)^2/2 + polylog(2, -1/2).
%F Equals Pi^2/12 + log(2)^2 + polylog(2, 1/4)/2.
%F Equals -polylog(2, -2). - _Vaclav Kotesovec_, Jul 29 2019
%e 1.436746366883680946362902023893583354249956435654872102667243924865...
%p evalf(Pi^2/6 + log(2)^2/2 + polylog(2, -1/2), 120);
%p Digits :=100 ; evalf(dilog(3)) ; # _R. J. Mathar_, Jan 07 2021
%t RealDigits[Pi^2/12 + Log[2]^2 + PolyLog[2, 1/4]/2,10,120][[1]]
%t RealDigits[-PolyLog[2, -2], 10, 120][[1]] (* _Vaclav Kotesovec_, Jul 29 2019 *)
%o (PARI) Pi^2/6 + log(2)^2/2 + polylog(2, -1/2) \\ _Michel Marcus_, Jan 04 2016
%Y Cf. A032302.
%K nonn,cons
%O 1,2
%A _Vaclav Kotesovec_, Jan 04 2016