\(\int \frac {e^{c+d x^2} \text {erfi}(b x)}{x^5} \, dx\) [264]

Optimal result

Integrand size = 17, antiderivative size = 17 \[ \int \frac {e^{c+d x^2} \text {erfi}(b x)}{x^5} \, dx=-\frac {b e^{c+\left (b^2+d\right ) x^2}}{6 \sqrt {\pi } x^3}-\frac {b d e^{c+\left (b^2+d\right ) x^2}}{2 \sqrt {\pi } x}-\frac {b \left (b^2+d\right ) e^{c+\left (b^2+d\right ) x^2}}{3 \sqrt {\pi } x}-\frac {e^{c+d x^2} \text {erfi}(b x)}{4 x^4}-\frac {d e^{c+d x^2} \text {erfi}(b x)}{4 x^2}+\frac {1}{2} b d \sqrt {b^2+d} e^c \text {erfi}\left (\sqrt {b^2+d} x\right )+\frac {1}{3} b \left (b^2+d\right )^{3/2} e^c \text {erfi}\left (\sqrt {b^2+d} x\right )+\frac {1}{2} d^2 \text {Int}\left (\frac {e^{c+d x^2} \text {erfi}(b x)}{x},x\right ) \]

[Out]

-1/4*exp(d*x^2+c)*erfi(b*x)/x^4-1/4*d*exp(d*x^2+c)*erfi(b*x)/x^2+1/3*b*(b^2+d)^(3/2)*exp(c)*erfi(x*(b^2+d)^(1/
2))+1/2*b*d*exp(c)*erfi(x*(b^2+d)^(1/2))*(b^2+d)^(1/2)-1/6*b*exp(c+(b^2+d)*x^2)/x^3/Pi^(1/2)-1/2*b*d*exp(c+(b^
2+d)*x^2)/x/Pi^(1/2)-1/3*b*(b^2+d)*exp(c+(b^2+d)*x^2)/x/Pi^(1/2)+1/2*d^2*Unintegrable(exp(d*x^2+c)*erfi(b*x)/x
,x)

Rubi [N/A]

Not integrable

Time = 0.24 (sec) , antiderivative size = 17, normalized size of antiderivative = 1.00, number of steps used = 0, number of rules used = 0, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.000, Rules used = {} \[ \int \frac {e^{c+d x^2} \text {erfi}(b x)}{x^5} \, dx=\int \frac {e^{c+d x^2} \text {erfi}(b x)}{x^5} \, dx \]

[In]

Int[(E^(c + d*x^2)*Erfi[b*x])/x^5,x]

[Out]

-1/6*(b*E^(c + (b^2 + d)*x^2))/(Sqrt[Pi]*x^3) - (b*d*E^(c + (b^2 + d)*x^2))/(2*Sqrt[Pi]*x) - (b*(b^2 + d)*E^(c
+ (b^2 + d)*x^2))/(3*Sqrt[Pi]*x) - (E^(c + d*x^2)*Erfi[b*x])/(4*x^4) - (d*E^(c + d*x^2)*Erfi[b*x])/(4*x^2) +
(b*d*Sqrt[b^2 + d]*E^c*Erfi[Sqrt[b^2 + d]*x])/2 + (b*(b^2 + d)^(3/2)*E^c*Erfi[Sqrt[b^2 + d]*x])/3 + (d^2*Defer
[Int][(E^(c + d*x^2)*Erfi[b*x])/x, x])/2

Rubi steps \begin{align*} \text {integral}& = -\frac {e^{c+d x^2} \text {erfi}(b x)}{4 x^4}+\frac {1}{2} d \int \frac {e^{c+d x^2} \text {erfi}(b x)}{x^3} \, dx+\frac {b \int \frac {e^{c+\left (b^2+d\right ) x^2}}{x^4} \, dx}{2 \sqrt {\pi }} \\ & = -\frac {b e^{c+\left (b^2+d\right ) x^2}}{6 \sqrt {\pi } x^3}-\frac {e^{c+d x^2} \text {erfi}(b x)}{4 x^4}-\frac {d e^{c+d x^2} \text {erfi}(b x)}{4 x^2}+\frac {1}{2} d^2 \int \frac {e^{c+d x^2} \text {erfi}(b x)}{x} \, dx+\frac {(b d) \int \frac {e^{c+\left (b^2+d\right ) x^2}}{x^2} \, dx}{2 \sqrt {\pi }}+\frac {\left (b \left (b^2+d\right )\right ) \int \frac {e^{c+\left (b^2+d\right ) x^2}}{x^2} \, dx}{3 \sqrt {\pi }} \\ & = -\frac {b e^{c+\left (b^2+d\right ) x^2}}{6 \sqrt {\pi } x^3}-\frac {b d e^{c+\left (b^2+d\right ) x^2}}{2 \sqrt {\pi } x}-\frac {b \left (b^2+d\right ) e^{c+\left (b^2+d\right ) x^2}}{3 \sqrt {\pi } x}-\frac {e^{c+d x^2} \text {erfi}(b x)}{4 x^4}-\frac {d e^{c+d x^2} \text {erfi}(b x)}{4 x^2}+\frac {1}{2} d^2 \int \frac {e^{c+d x^2} \text {erfi}(b x)}{x} \, dx+\frac {\left (b d \left (b^2+d\right )\right ) \int e^{c+\left (b^2+d\right ) x^2} \, dx}{\sqrt {\pi }}+\frac {\left (2 b \left (b^2+d\right )^2\right ) \int e^{c+\left (b^2+d\right ) x^2} \, dx}{3 \sqrt {\pi }} \\ & = -\frac {b e^{c+\left (b^2+d\right ) x^2}}{6 \sqrt {\pi } x^3}-\frac {b d e^{c+\left (b^2+d\right ) x^2}}{2 \sqrt {\pi } x}-\frac {b \left (b^2+d\right ) e^{c+\left (b^2+d\right ) x^2}}{3 \sqrt {\pi } x}-\frac {e^{c+d x^2} \text {erfi}(b x)}{4 x^4}-\frac {d e^{c+d x^2} \text {erfi}(b x)}{4 x^2}+\frac {1}{2} b d \sqrt {b^2+d} e^c \text {erfi}\left (\sqrt {b^2+d} x\right )+\frac {1}{3} b \left (b^2+d\right )^{3/2} e^c \text {erfi}\left (\sqrt {b^2+d} x\right )+\frac {1}{2} d^2 \int \frac {e^{c+d x^2} \text {erfi}(b x)}{x} \, dx \\ \end{align*}

Mathematica [N/A]

Not integrable

Time = 0.17 (sec) , antiderivative size = 19, normalized size of antiderivative = 1.12 \[ \int \frac {e^{c+d x^2} \text {erfi}(b x)}{x^5} \, dx=\int \frac {e^{c+d x^2} \text {erfi}(b x)}{x^5} \, dx \]

[In]

Integrate[(E^(c + d*x^2)*Erfi[b*x])/x^5,x]

[Out]

Integrate[(E^(c + d*x^2)*Erfi[b*x])/x^5, x]

Maple [N/A] (verified)

Not integrable

Time = 0.19 (sec) , antiderivative size = 16, normalized size of antiderivative = 0.94

\[\int \frac {{\mathrm e}^{d \,x^{2}+c} \operatorname {erfi}\left (b x \right )}{x^{5}}d x\]

[In]

int(exp(d*x^2+c)*erfi(b*x)/x^5,x)

[Out]

int(exp(d*x^2+c)*erfi(b*x)/x^5,x)

Fricas [N/A]

Not integrable

Time = 0.26 (sec) , antiderivative size = 18, normalized size of antiderivative = 1.06 \[ \int \frac {e^{c+d x^2} \text {erfi}(b x)}{x^5} \, dx=\int { \frac {\operatorname {erfi}\left (b x\right ) e^{\left (d x^{2} + c\right )}}{x^{5}} \,d x } \]

[In]

integrate(exp(d*x^2+c)*erfi(b*x)/x^5,x, algorithm="fricas")

[Out]

integral(erfi(b*x)*e^(d*x^2 + c)/x^5, x)

Sympy [N/A]

Not integrable

Time = 32.02 (sec) , antiderivative size = 19, normalized size of antiderivative = 1.12 \[ \int \frac {e^{c+d x^2} \text {erfi}(b x)}{x^5} \, dx=e^{c} \int \frac {e^{d x^{2}} \operatorname {erfi}{\left (b x \right )}}{x^{5}}\, dx \]

[In]

integrate(exp(d*x**2+c)*erfi(b*x)/x**5,x)

[Out]

exp(c)*Integral(exp(d*x**2)*erfi(b*x)/x**5, x)

Maxima [N/A]

Not integrable

Time = 0.25 (sec) , antiderivative size = 18, normalized size of antiderivative = 1.06 \[ \int \frac {e^{c+d x^2} \text {erfi}(b x)}{x^5} \, dx=\int { \frac {\operatorname {erfi}\left (b x\right ) e^{\left (d x^{2} + c\right )}}{x^{5}} \,d x } \]

[In]

integrate(exp(d*x^2+c)*erfi(b*x)/x^5,x, algorithm="maxima")

[Out]

integrate(erfi(b*x)*e^(d*x^2 + c)/x^5, x)

Giac [N/A]

Not integrable

Time = 0.26 (sec) , antiderivative size = 18, normalized size of antiderivative = 1.06 \[ \int \frac {e^{c+d x^2} \text {erfi}(b x)}{x^5} \, dx=\int { \frac {\operatorname {erfi}\left (b x\right ) e^{\left (d x^{2} + c\right )}}{x^{5}} \,d x } \]

[In]

integrate(exp(d*x^2+c)*erfi(b*x)/x^5,x, algorithm="giac")

[Out]

integrate(erfi(b*x)*e^(d*x^2 + c)/x^5, x)

Mupad [N/A]

Not integrable

Time = 5.97 (sec) , antiderivative size = 18, normalized size of antiderivative = 1.06 \[ \int \frac {e^{c+d x^2} \text {erfi}(b x)}{x^5} \, dx=\int \frac {{\mathrm {e}}^{d\,x^2+c}\,\mathrm {erfi}\left (b\,x\right )}{x^5} \,d x \]

[In]

int((exp(c + d*x^2)*erfi(b*x))/x^5,x)

[Out]

int((exp(c + d*x^2)*erfi(b*x))/x^5, x)