|
%I #13 Jun 11 2015 04:47:05
%S 9,1,5,3,3,7,0,1,9,2,4,5,4,1,2,2,4,6,1,9,4,8,5,3,0,2,9,2,4,0,1,3,5,4,
%T 5,4,0,0,7,3,3,2,7,2,0,4,1,2,1,8,4,8,8,4,9,6,8,9,2,6,3,2,0,1,4,7,6,1,
%U 3,8,3,7,6,6,8,9,5,7,3,1,6,2,3,9,1,5,1,9,0,2,5,5,8,7,9,5,1,9,2,8,4,5,3,8,9
%N Decimal expansion of a constant related to A206226.
%F Equals limit n->infinity A206226(n)^(1/n).
%F Equals limit n->infinity A206227(n)^(1/n).
%F Equals limit n->infinity A206240(n)^(1/n).
%e 9.153370192454122461948530292401354540073...
%t r^3/(r-1) /.FindRoot[-PolyLog[2, 1-r] == 3*Log[r]^2/2, {r, E}, WorkingPrecision->120] (* _Vaclav Kotesovec_, Jun 11 2015 *)
%Y Cf. A206226, A206227, A206240, A258234, A107379, A173519, A238016, A258789.
%K nonn,cons
%O 1,1
%A _Vaclav Kotesovec_, May 25 2015
%E More digits from _Vaclav Kotesovec_, Jun 10 2015
|
