\(\int \frac {2 x^2+e^{3968-1512 x+144 x^2} x (1-1512 x+288 x^2)}{x} \, dx\) [10169]

Optimal result

Integrand size = 34, antiderivative size = 22 \[ \int \frac {2 x^2+e^{3968-1512 x+144 x^2} x \left (1-1512 x+288 x^2\right )}{x} \, dx=e^{-1+9 (-9+3 (-4+x)+x)^2} x+x^2 \]

[Out]

exp(ln(x)+3*(4*x-21)*(12*x-63)-1)+x^2

Rubi [A] (verified)

Time = 0.03 (sec) , antiderivative size = 33, normalized size of antiderivative = 1.50, number of steps used = 3, number of rules used = 2, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.059, Rules used = {14, 2326} \[ \int \frac {2 x^2+e^{3968-1512 x+144 x^2} x \left (1-1512 x+288 x^2\right )}{x} \, dx=x^2+\frac {e^{144 x^2-1512 x+3968} \left (21 x-4 x^2\right )}{21-4 x} \]

[In]

Int[(2*x^2 + E^(3968 - 1512*x + 144*x^2)*x*(1 - 1512*x + 288*x^2))/x,x]

[Out]

x^2 + (E^(3968 - 1512*x + 144*x^2)*(21*x - 4*x^2))/(21 - 4*x)

Rule 14

Int[(u_)*((c_.)*(x_))^(m_.), x_Symbol] :> Int[ExpandIntegrand[(c*x)^m*u, x], x] /; FreeQ[{c, m}, x] && SumQ[u]
&&  !LinearQ[u, x] &&  !MatchQ[u, (a_) + (b_.)*(v_) /; FreeQ[{a, b}, x] && InverseFunctionQ[v]]

Rule 2326

Int[(y_.)*(F_)^(u_)*((v_) + (w_)), x_Symbol] :> With[{z = v*(y/(Log[F]*D[u, x]))}, Simp[F^u*z, x] /; EqQ[D[z,
x], w*y]] /; FreeQ[F, x]

Rubi steps \begin{align*} \text {integral}& = \int \left (2 x+e^{3968-1512 x+144 x^2} \left (1-1512 x+288 x^2\right )\right ) \, dx \\ & = x^2+\int e^{3968-1512 x+144 x^2} \left (1-1512 x+288 x^2\right ) \, dx \\ & = x^2+\frac {e^{3968-1512 x+144 x^2} \left (21 x-4 x^2\right )}{21-4 x} \\ \end{align*}

Mathematica [A] (verified)

Time = 0.25 (sec) , antiderivative size = 18, normalized size of antiderivative = 0.82 \[ \int \frac {2 x^2+e^{3968-1512 x+144 x^2} x \left (1-1512 x+288 x^2\right )}{x} \, dx=x \left (e^{8 \left (496-189 x+18 x^2\right )}+x\right ) \]

[In]

Integrate[(2*x^2 + E^(3968 - 1512*x + 144*x^2)*x*(1 - 1512*x + 288*x^2))/x,x]

[Out]

x*(E^(8*(496 - 189*x + 18*x^2)) + x)

Maple [A] (verified)

Time = 0.16 (sec) , antiderivative size = 18, normalized size of antiderivative = 0.82

method	result	size
default	\({\mathrm e}^{\ln \left (x \right )+144 x^{2}-1512 x +3968}+x^{2}\)	\(18\)
norman	\({\mathrm e}^{\ln \left (x \right )+144 x^{2}-1512 x +3968}+x^{2}\)	\(18\)
parallelrisch	\({\mathrm e}^{\ln \left (x \right )+144 x^{2}-1512 x +3968}+x^{2}\)	\(18\)
parts	\({\mathrm e}^{\ln \left (x \right )+144 x^{2}-1512 x +3968}+x^{2}\)	\(18\)
risch	\(x \,{\mathrm e}^{8 \left (6 x -31\right ) \left (3 x -16\right )}+x^{2}\)	\(20\)

[In]

int(((288*x^2-1512*x+1)*exp(ln(x)+144*x^2-1512*x+3968)+2*x^2)/x,x,method=_RETURNVERBOSE)

[Out]

exp(ln(x)+144*x^2-1512*x+3968)+x^2

Fricas [A] (verification not implemented)

none

Time = 0.27 (sec) , antiderivative size = 17, normalized size of antiderivative = 0.77 \[ \int \frac {2 x^2+e^{3968-1512 x+144 x^2} x \left (1-1512 x+288 x^2\right )}{x} \, dx=x^{2} + e^{\left (144 \, x^{2} - 1512 \, x + \log \left (x\right ) + 3968\right )} \]

[In]

integrate(((288*x^2-1512*x+1)*exp(log(x)+144*x^2-1512*x+3968)+2*x^2)/x,x, algorithm="fricas")

[Out]

x^2 + e^(144*x^2 - 1512*x + log(x) + 3968)

Sympy [A] (verification not implemented)

Time = 0.06 (sec) , antiderivative size = 15, normalized size of antiderivative = 0.68 \[ \int \frac {2 x^2+e^{3968-1512 x+144 x^2} x \left (1-1512 x+288 x^2\right )}{x} \, dx=x^{2} + x e^{144 x^{2} - 1512 x + 3968} \]

[In]

integrate(((288*x**2-1512*x+1)*exp(ln(x)+144*x**2-1512*x+3968)+2*x**2)/x,x)

[Out]

x**2 + x*exp(144*x**2 - 1512*x + 3968)

Maxima [C] (verification not implemented)

Result contains higher order function than in optimal. Order 4 vs. order 3.

Time = 0.34 (sec) , antiderivative size = 153, normalized size of antiderivative = 6.95 \[ \int \frac {2 x^2+e^{3968-1512 x+144 x^2} x \left (1-1512 x+288 x^2\right )}{x} \, dx=-\frac {1}{24} i \, \sqrt {\pi } \operatorname {erf}\left (12 i \, x - 63 i\right ) e^{\left (-1\right )} + x^{2} - \frac {1}{12} \, {\left (\frac {{\left (4 \, x - 21\right )}^{3} \Gamma \left (\frac {3}{2}, -9 \, {\left (4 \, x - 21\right )}^{2}\right )}{\left (-{\left (4 \, x - 21\right )}^{2}\right )^{\frac {3}{2}}} - \frac {3969 \, \sqrt {\pi } {\left (4 \, x - 21\right )} {\left (\operatorname {erf}\left (3 \, \sqrt {-{\left (4 \, x - 21\right )}^{2}}\right ) - 1\right )}}{\sqrt {-{\left (4 \, x - 21\right )}^{2}}} - 126 \, e^{\left (9 \, {\left (4 \, x - 21\right )}^{2}\right )}\right )} e^{\left (-1\right )} - \frac {21}{4} \, {\left (\frac {63 \, \sqrt {\pi } {\left (4 \, x - 21\right )} {\left (\operatorname {erf}\left (3 \, \sqrt {-{\left (4 \, x - 21\right )}^{2}}\right ) - 1\right )}}{\sqrt {-{\left (4 \, x - 21\right )}^{2}}} + e^{\left (9 \, {\left (4 \, x - 21\right )}^{2}\right )}\right )} e^{\left (-1\right )} \]

[In]

integrate(((288*x^2-1512*x+1)*exp(log(x)+144*x^2-1512*x+3968)+2*x^2)/x,x, algorithm="maxima")

[Out]

-1/24*I*sqrt(pi)*erf(12*I*x - 63*I)*e^(-1) + x^2 - 1/12*((4*x - 21)^3*gamma(3/2, -9*(4*x - 21)^2)/(-(4*x - 21)
^2)^(3/2) - 3969*sqrt(pi)*(4*x - 21)*(erf(3*sqrt(-(4*x - 21)^2)) - 1)/sqrt(-(4*x - 21)^2) - 126*e^(9*(4*x - 21
)^2))*e^(-1) - 21/4*(63*sqrt(pi)*(4*x - 21)*(erf(3*sqrt(-(4*x - 21)^2)) - 1)/sqrt(-(4*x - 21)^2) + e^(9*(4*x -
21)^2))*e^(-1)

Giac [A] (verification not implemented)

none

Time = 0.28 (sec) , antiderivative size = 17, normalized size of antiderivative = 0.77 \[ \int \frac {2 x^2+e^{3968-1512 x+144 x^2} x \left (1-1512 x+288 x^2\right )}{x} \, dx=x^{2} + x e^{\left (144 \, x^{2} - 1512 \, x + 3968\right )} \]

[In]

integrate(((288*x^2-1512*x+1)*exp(log(x)+144*x^2-1512*x+3968)+2*x^2)/x,x, algorithm="giac")

[Out]

x^2 + x*e^(144*x^2 - 1512*x + 3968)

Mupad [B] (verification not implemented)

Time = 13.98 (sec) , antiderivative size = 18, normalized size of antiderivative = 0.82 \[ \int \frac {2 x^2+e^{3968-1512 x+144 x^2} x \left (1-1512 x+288 x^2\right )}{x} \, dx=x^2+x\,{\mathrm {e}}^{-1512\,x}\,{\mathrm {e}}^{3968}\,{\mathrm {e}}^{144\,x^2} \]

[In]

int((exp(log(x) - 1512*x + 144*x^2 + 3968)*(288*x^2 - 1512*x + 1) + 2*x^2)/x,x)

[Out]

x^2 + x*exp(-1512*x)*exp(3968)*exp(144*x^2)