plot((-LambertW(-ln(x))), x = e^(-e) .. e^(1/e))