OFFSET
1,1
COMMENTS
LINKS
Stanislav Sykora, Table of n, a(n) for n = 1..2000
Eric Weisstein's World of Mathematics, Logarithmic Integral
Wikipedia, Logarithmic integral function
EXAMPLE
2.68451035082070765250238264048723868531017973459855163522041486450...
MATHEMATICA
1/x/.FindRoot[ExpIntegralEi[x] == 0, {x, 1}, WorkingPrecision -> 104] (* Vaclav Kotesovec, Sep 27 2016 *)
PROG
(PARI) li(z) = {my(c=z+0.0*I); \\ Computes li(z) for any complex z
if(imag(c)<0, return(-Pi*I-eint1(-log(c))), return(+Pi*I-eint1(-log(c)))); }
a = 1/log(solve(x=1.1, 2.0, real(li(x)))) \\ Computes this constant
CROSSREFS
KEYWORD
AUTHOR
Stanislav Sykora, Sep 15 2016
STATUS
approved