Plot[ExpIntegralEi[z], {z, 0, 1}]