%I #7 Dec 04 2016 03:23:46
%S 2,7,4,4,1,0,6,3,1,9,0,2,8,4,8,1,0,0,4,4,0,1,7,5,0,6,2,1,1,0,9,4,8,0,
%T 1,7,8,1,8,8,5,8,4,0,2,5,6,7,0,3,4,7,4,4,1,0,2,0,4,2,0,2,3,5,7,6,8,8,
%U 1,9,3,7,1,8,8,6,0,5,2,6,0,5,5,4,3,8,3,8,9,2,0,2,9,2,7,3,3,9,8,1
%N Decimal expansion of the positive solution to log(x)/x == -3*Pi/2.
%H Stephen Crowley, <a href="http://arxiv.org/pdf/1210.5652v1.pdf">Integral Transforms of the Harmonic Sawtooth Map</a>, page 32.
%F exp(-LambertW(3*Pi/2)).
%e 0.2744106319028481004401750621109480178188584...
%t RealDigits[Exp[-ProductLog[3*Pi/2]], 10, 100] // First
%o (PARI) exp(-lambertw(3*Pi/2)) \\ _Charles R Greathouse IV_, Dec 04 2016
%K nonn,cons
%O 0,1
%A _Jean-François Alcover_, Apr 24 2014
|