
Last chance! 50% off unlimited learning
Sale ends in
Computes the exponential integral
expint(x, deriv = 0)
expexpint(x, deriv = 0)
expint.E1(x, deriv = 0)
Function expint(x, deriv = n)
returns the
expexpint(x, deriv = n)
returns the
expint.E1(x, deriv = n)
returns the
Numeric. Ideally a vector of positive reals.
Integer. Either 0, 1, 2 or 3.
T. W. Yee has simply written a small wrapper function to call the NETLIB FORTRAN code. Xiangjie Xue modified the functions to calculate derivatives. Higher derivatives can actually be calculated---please let me know if you need it.
These functions have not been tested thoroughly.
The exponential integral
https://netlib.org/specfun/ei.
if (FALSE) {
par(mfrow = c(2, 2))
curve(expint, 0.01, 2, xlim = c(0, 2), ylim = c(-3, 5),
las = 1, col = "orange")
abline(v = (-3):5, h = (-4):5, lwd = 2, lty = "dotted", col = "gray")
abline(h = 0, v = 0, lty = "dashed", col = "blue")
curve(expexpint, 0.01, 2, xlim = c(0, 2), ylim = c(-3, 2),
las = 1, col = "orange")
abline(v = (-3):2, h = (-4):5, lwd = 2, lty = "dotted", col = "gray")
abline(h = 0, v = 0, lty = "dashed", col = "blue")
curve(expint.E1, 0.01, 2, xlim = c(0, 2), ylim = c(0, 5),
las = 1, col = "orange")
abline(v = (-3):2, h = (-4):5, lwd = 2, lty = "dotted", col = "gray")
abline(h = 0, v = 0, lty = "dashed", col = "blue")
}
Run the code above in your browser using DataLab