3.66.75 \(\int \frac {e^{-x} (e^4 (-45-15 x)+e^x (24 x-3 x^2))}{x^4} \, dx\)

Optimal. Leaf size=25 \[ \frac {3+\frac {3 \left (-4+\frac {5 e^{4-x}}{x}\right )}{x}}{x} \]

________________________________________________________________________________________

Rubi [A]  time = 0.19, antiderivative size = 27, normalized size of antiderivative = 1.08, number of steps used = 4, number of rules used = 3, integrand size = 32, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.094, Rules used = {6742, 37, 2197} \begin {gather*} \frac {15 e^{4-x}}{x^3}-\frac {3 (8-x)^2}{16 x^2} \end {gather*}

Antiderivative was successfully verified.

[In]

Int[(E^4*(-45 - 15*x) + E^x*(24*x - 3*x^2))/(E^x*x^4),x]

[Out]

(15*E^(4 - x))/x^3 - (3*(8 - x)^2)/(16*x^2)

Rule 37

Int[((a_.) + (b_.)*(x_))^(m_.)*((c_.) + (d_.)*(x_))^(n_), x_Symbol] :> Simp[((a + b*x)^(m + 1)*(c + d*x)^(n +
1))/((b*c - a*d)*(m + 1)), x] /; FreeQ[{a, b, c, d, m, n}, x] && NeQ[b*c - a*d, 0] && EqQ[m + n + 2, 0] && NeQ
[m, -1]

Rule 2197

Int[(F_)^((c_.)*(v_))*(u_)^(m_.)*(w_), x_Symbol] :> With[{b = Coefficient[v, x, 1], d = Coefficient[u, x, 0],
e = Coefficient[u, x, 1], f = Coefficient[w, x, 0], g = Coefficient[w, x, 1]}, Simp[(g*u^(m + 1)*F^(c*v))/(b*c
*e*Log[F]), x] /; EqQ[e*g*(m + 1) - b*c*(e*f - d*g)*Log[F], 0]] /; FreeQ[{F, c, m}, x] && LinearQ[{u, v, w}, x
]

Rule 6742

Int[u_, x_Symbol] :> With[{v = ExpandIntegrand[u, x]}, Int[v, x] /; SumQ[v]]

Rubi steps

\begin {gather*} \begin {aligned} \text {integral} &=\int \left (-\frac {3 (-8+x)}{x^3}-\frac {15 e^{4-x} (3+x)}{x^4}\right ) \, dx\\ &=-\left (3 \int \frac {-8+x}{x^3} \, dx\right )-15 \int \frac {e^{4-x} (3+x)}{x^4} \, dx\\ &=\frac {15 e^{4-x}}{x^3}-\frac {3 (8-x)^2}{16 x^2}\\ \end {aligned} \end {gather*}

________________________________________________________________________________________

Mathematica [A]  time = 0.06, size = 20, normalized size = 0.80 \begin {gather*} \frac {3 \left (5 e^{4-x}+(-4+x) x\right )}{x^3} \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[(E^4*(-45 - 15*x) + E^x*(24*x - 3*x^2))/(E^x*x^4),x]

[Out]

(3*(5*E^(4 - x) + (-4 + x)*x))/x^3

________________________________________________________________________________________

fricas [A]  time = 0.67, size = 24, normalized size = 0.96 \begin {gather*} \frac {3 \, {\left ({\left (x^{2} - 4 \, x\right )} e^{x} + 5 \, e^{4}\right )} e^{\left (-x\right )}}{x^{3}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(((-3*x^2+24*x)*exp(x)+(-15*x-45)*exp(4))/exp(x)/x^4,x, algorithm="fricas")

[Out]

3*((x^2 - 4*x)*e^x + 5*e^4)*e^(-x)/x^3

________________________________________________________________________________________

giac [A]  time = 0.19, size = 20, normalized size = 0.80 \begin {gather*} \frac {3 \, {\left (x^{2} - 4 \, x + 5 \, e^{\left (-x + 4\right )}\right )}}{x^{3}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(((-3*x^2+24*x)*exp(x)+(-15*x-45)*exp(4))/exp(x)/x^4,x, algorithm="giac")

[Out]

3*(x^2 - 4*x + 5*e^(-x + 4))/x^3

________________________________________________________________________________________

maple [A]  time = 0.06, size = 22, normalized size = 0.88

method	result	size
risch	\(\frac {3 x -12}{x^{2}}+\frac {15 \,{\mathrm e}^{-x +4}}{x^{3}}\)	\(22\)
norman	\(\frac {\left (-12 \,{\mathrm e}^{x} x +3 \,{\mathrm e}^{x} x^{2}+15 \,{\mathrm e}^{4}\right ) {\mathrm e}^{-x}}{x^{3}}\)	\(26\)
default	\(-\frac {12}{x^{2}}+\frac {3}{x}-45 \,{\mathrm e}^{4} \left (-\frac {{\mathrm e}^{-x}}{3 x^{3}}+\frac {{\mathrm e}^{-x}}{6 x^{2}}-\frac {{\mathrm e}^{-x}}{6 x}+\frac {\expIntegralEi \left (1, x\right )}{6}\right )-15 \,{\mathrm e}^{4} \left (-\frac {{\mathrm e}^{-x}}{2 x^{2}}+\frac {{\mathrm e}^{-x}}{2 x}-\frac {\expIntegralEi \left (1, x\right )}{2}\right )\)	\(77\)

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(((-3*x^2+24*x)*exp(x)+(-15*x-45)*exp(4))/exp(x)/x^4,x,method=_RETURNVERBOSE)

[Out]

(3*x-12)/x^2+15/x^3*exp(-x+4)

________________________________________________________________________________________

maxima [C]  time = 0.41, size = 25, normalized size = 1.00 \begin {gather*} 15 \, e^{4} \Gamma \left (-2, x\right ) + 45 \, e^{4} \Gamma \left (-3, x\right ) + \frac {3}{x} - \frac {12}{x^{2}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(((-3*x^2+24*x)*exp(x)+(-15*x-45)*exp(4))/exp(x)/x^4,x, algorithm="maxima")

[Out]

15*e^4*gamma(-2, x) + 45*e^4*gamma(-3, x) + 3/x - 12/x^2

________________________________________________________________________________________

mupad [B]  time = 0.09, size = 21, normalized size = 0.84 \begin {gather*} \frac {15\,{\mathrm {e}}^{4-x}-12\,x+3\,x^2}{x^3} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((exp(-x)*(exp(x)*(24*x - 3*x^2) - exp(4)*(15*x + 45)))/x^4,x)

[Out]

(15*exp(4 - x) - 12*x + 3*x^2)/x^3

________________________________________________________________________________________

sympy [A]  time = 0.13, size = 19, normalized size = 0.76 \begin {gather*} - \frac {12 - 3 x}{x^{2}} + \frac {15 e^{4} e^{- x}}{x^{3}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(((-3*x**2+24*x)*exp(x)+(-15*x-45)*exp(4))/exp(x)/x**4,x)

[Out]

-(12 - 3*x)/x**2 + 15*exp(4)*exp(-x)/x**3

________________________________________________________________________________________