Series[ExpIntegralEi[x], {x, Infinity, 15}]