How would we plot: $$\int - \frac {W(-\ln x)}{\ln x} dx$$ Where $W$ is the Lambert W function?
2 Answers
Put this all here but this works:
lambs =
Quiet@
Table[
{x, NIntegrate[-LambertW[-Log[y]]/Log[y], {y, .1, x},
MaxRecursion -> 200]},
{x, 0, 1.6, .01}
];
ListLinePlot[lambs]
If you take this out to x=10
and plot both the real and imaginary parts:
ListLinePlot[
{
Re@lambs,
Transpose[{lambs[[All, 1]], Im@lambs[[All, 2]]}]
}
]
LambertW
easily found in the docs? I couldn't find anything about it. $\endgroup$LambertW
is an alias forProductLog
. $\endgroup$PolyLog
? (See the diagram when you search forReImPlot
) $\endgroup$