3
$\begingroup$

I have an expression that evaluates to an expression containing multiple ExpIntegralEi expressions. However, I would prefer that Mathematica use ExpIntegralE instead. Is this possible somehow?

(Usually $\operatorname{Ei}(-x) = -E_1(x)$. However, just switching the signs does not work -- I think this relationship is not generally valid for arbitrary complex arguments).

$\endgroup$
1
  • $\begingroup$ Apart, perhaps, from branch cuts, it should work, according to Wolfram MathWorld. $\endgroup$
    – bbgodfrey
    Dec 8, 2015 at 23:45

1 Answer 1

5
$\begingroup$

The two functions can be related with the appropriate choice of analytical extension at the branch cut. Replace

ExpIntegralEi[x + I y]

by

-ExpIntegralE[1, -x - I y] + Piecewise[{{-I Pi, y < 0}, {I Pi, y > 0}}]

A numerical comparison of the two shows that they are equal.

Plot3D[Evaluate[ReIm[ExpIntegralEi[x + I y]]], {x, -2, 2}, {y, -2, 2}, 
    AxesLabel -> {x, y, Ei}]

enter image description here

Plot3D[Evaluate[ReIm[-ExpIntegralE[1, -x - I y] + 
    Piecewise[{{-I Pi, y < 0}, {I Pi, y > 0}}]]], {x, -2, 2}, {y, -2, 2},
    AxesLabel -> {x, y, E1}]

enter image description here

$\endgroup$

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service and acknowledge that you have read and understand our privacy policy and code of conduct.

Not the answer you're looking for? Browse other questions tagged or ask your own question.