\(\int (15-2 x+e^{-27+24 x+3 x^2} (1+24 x+6 x^2)-8 \log (x)+\log ^2(x)) \, dx\) [2669]

   Optimal result
   Rubi [A] (verified)
   Mathematica [A] (verified)
   Maple [A] (verified)
   Fricas [A] (verification not implemented)
   Sympy [A] (verification not implemented)
   Maxima [A] (verification not implemented)
   Giac [A] (verification not implemented)
   Mupad [B] (verification not implemented)

Optimal result

Integrand size = 36, antiderivative size = 25 \[ \int \left (15-2 x+e^{-27+24 x+3 x^2} \left (1+24 x+6 x^2\right )-8 \log (x)+\log ^2(x)\right ) \, dx=x \left (e^{3 \left (-25+(4+x)^2\right )}-x+(5-\log (x))^2\right ) \]

[Out]

x*((5-ln(x))^2+exp(3*(4+x)^2-75)-x)

Rubi [A] (verified)

Time = 0.02 (sec) , antiderivative size = 45, normalized size of antiderivative = 1.80, number of steps used = 5, number of rules used = 3, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.083, Rules used = {2326, 2332, 2333} \[ \int \left (15-2 x+e^{-27+24 x+3 x^2} \left (1+24 x+6 x^2\right )-8 \log (x)+\log ^2(x)\right ) \, dx=-x^2+\frac {e^{3 x^2+24 x-27} \left (x^2+4 x\right )}{x+4}+25 x+x \log ^2(x)-10 x \log (x) \]

[In]

Int[15 - 2*x + E^(-27 + 24*x + 3*x^2)*(1 + 24*x + 6*x^2) - 8*Log[x] + Log[x]^2,x]

[Out]

25*x - x^2 + (E^(-27 + 24*x + 3*x^2)*(4*x + x^2))/(4 + x) - 10*x*Log[x] + x*Log[x]^2

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]

Rule 2332

Int[Log[(c_.)*(x_)^(n_.)], x_Symbol] :> Simp[x*Log[c*x^n], x] - Simp[n*x, x] /; FreeQ[{c, n}, x]

Rule 2333

Int[((a_.) + Log[(c_.)*(x_)^(n_.)]*(b_.))^(p_.), x_Symbol] :> Simp[x*(a + b*Log[c*x^n])^p, x] - Dist[b*n*p, In
t[(a + b*Log[c*x^n])^(p - 1), x], x] /; FreeQ[{a, b, c, n}, x] && GtQ[p, 0] && IntegerQ[2*p]

Rubi steps \begin{align*} \text {integral}& = 15 x-x^2-8 \int \log (x) \, dx+\int e^{-27+24 x+3 x^2} \left (1+24 x+6 x^2\right ) \, dx+\int \log ^2(x) \, dx \\ & = 23 x-x^2+\frac {e^{-27+24 x+3 x^2} \left (4 x+x^2\right )}{4+x}-8 x \log (x)+x \log ^2(x)-2 \int \log (x) \, dx \\ & = 25 x-x^2+\frac {e^{-27+24 x+3 x^2} \left (4 x+x^2\right )}{4+x}-10 x \log (x)+x \log ^2(x) \\ \end{align*}

Mathematica [A] (verified)

Time = 0.16 (sec) , antiderivative size = 25, normalized size of antiderivative = 1.00 \[ \int \left (15-2 x+e^{-27+24 x+3 x^2} \left (1+24 x+6 x^2\right )-8 \log (x)+\log ^2(x)\right ) \, dx=x \left (25+e^{-27+3 x (8+x)}-x-10 \log (x)+\log ^2(x)\right ) \]

[In]

Integrate[15 - 2*x + E^(-27 + 24*x + 3*x^2)*(1 + 24*x + 6*x^2) - 8*Log[x] + Log[x]^2,x]

[Out]

x*(25 + E^(-27 + 3*x*(8 + x)) - x - 10*Log[x] + Log[x]^2)

Maple [A] (verified)

Time = 0.10 (sec) , antiderivative size = 32, normalized size of antiderivative = 1.28

method result size
risch \(x \ln \left (x \right )^{2}+{\mathrm e}^{3 \left (x +9\right ) \left (-1+x \right )} x +25 x -x^{2}-10 x \ln \left (x \right )\) \(32\)
norman \(x \ln \left (x \right )^{2}+{\mathrm e}^{3 x^{2}+24 x -27} x +25 x -x^{2}-10 x \ln \left (x \right )\) \(34\)
parallelrisch \(x \ln \left (x \right )^{2}+{\mathrm e}^{3 x^{2}+24 x -27} x +25 x -x^{2}-10 x \ln \left (x \right )\) \(34\)
default \(25 x +x \ln \left (x \right )^{2}-10 x \ln \left (x \right )-\frac {i {\mathrm e}^{-27} \sqrt {\pi }\, {\mathrm e}^{-48} \sqrt {3}\, \operatorname {erf}\left (i \sqrt {3}\, x +4 i \sqrt {3}\right )}{6}+24 \,{\mathrm e}^{-27} \left (\frac {{\mathrm e}^{3 x^{2}+24 x}}{6}+\frac {2 i \sqrt {\pi }\, {\mathrm e}^{-48} \sqrt {3}\, \operatorname {erf}\left (i \sqrt {3}\, x +4 i \sqrt {3}\right )}{3}\right )+6 \,{\mathrm e}^{-27} \left (\frac {x \,{\mathrm e}^{3 x^{2}+24 x}}{6}-\frac {2 \,{\mathrm e}^{3 x^{2}+24 x}}{3}-\frac {95 i \sqrt {\pi }\, {\mathrm e}^{-48} \sqrt {3}\, \operatorname {erf}\left (i \sqrt {3}\, x +4 i \sqrt {3}\right )}{36}\right )-x^{2}\) \(148\)
parts \(25 x +x \ln \left (x \right )^{2}-10 x \ln \left (x \right )-\frac {i {\mathrm e}^{-27} \sqrt {\pi }\, {\mathrm e}^{-48} \sqrt {3}\, \operatorname {erf}\left (i \sqrt {3}\, x +4 i \sqrt {3}\right )}{6}+24 \,{\mathrm e}^{-27} \left (\frac {{\mathrm e}^{3 x^{2}+24 x}}{6}+\frac {2 i \sqrt {\pi }\, {\mathrm e}^{-48} \sqrt {3}\, \operatorname {erf}\left (i \sqrt {3}\, x +4 i \sqrt {3}\right )}{3}\right )+6 \,{\mathrm e}^{-27} \left (\frac {x \,{\mathrm e}^{3 x^{2}+24 x}}{6}-\frac {2 \,{\mathrm e}^{3 x^{2}+24 x}}{3}-\frac {95 i \sqrt {\pi }\, {\mathrm e}^{-48} \sqrt {3}\, \operatorname {erf}\left (i \sqrt {3}\, x +4 i \sqrt {3}\right )}{36}\right )-x^{2}\) \(148\)

[In]

int(ln(x)^2-8*ln(x)+(6*x^2+24*x+1)*exp(3*x^2+24*x-27)-2*x+15,x,method=_RETURNVERBOSE)

[Out]

x*ln(x)^2+exp(3*(x+9)*(-1+x))*x+25*x-x^2-10*x*ln(x)

Fricas [A] (verification not implemented)

none

Time = 0.25 (sec) , antiderivative size = 33, normalized size of antiderivative = 1.32 \[ \int \left (15-2 x+e^{-27+24 x+3 x^2} \left (1+24 x+6 x^2\right )-8 \log (x)+\log ^2(x)\right ) \, dx=x \log \left (x\right )^{2} - x^{2} + x e^{\left (3 \, x^{2} + 24 \, x - 27\right )} - 10 \, x \log \left (x\right ) + 25 \, x \]

[In]

integrate(log(x)^2-8*log(x)+(6*x^2+24*x+1)*exp(3*x^2+24*x-27)-2*x+15,x, algorithm="fricas")

[Out]

x*log(x)^2 - x^2 + x*e^(3*x^2 + 24*x - 27) - 10*x*log(x) + 25*x

Sympy [A] (verification not implemented)

Time = 0.09 (sec) , antiderivative size = 32, normalized size of antiderivative = 1.28 \[ \int \left (15-2 x+e^{-27+24 x+3 x^2} \left (1+24 x+6 x^2\right )-8 \log (x)+\log ^2(x)\right ) \, dx=- x^{2} + x e^{3 x^{2} + 24 x - 27} + x \log {\left (x \right )}^{2} - 10 x \log {\left (x \right )} + 25 x \]

[In]

integrate(ln(x)**2-8*ln(x)+(6*x**2+24*x+1)*exp(3*x**2+24*x-27)-2*x+15,x)

[Out]

-x**2 + x*exp(3*x**2 + 24*x - 27) + x*log(x)**2 - 10*x*log(x) + 25*x

Maxima [A] (verification not implemented)

none

Time = 0.20 (sec) , antiderivative size = 39, normalized size of antiderivative = 1.56 \[ \int \left (15-2 x+e^{-27+24 x+3 x^2} \left (1+24 x+6 x^2\right )-8 \log (x)+\log ^2(x)\right ) \, dx={\left (\log \left (x\right )^{2} - 2 \, \log \left (x\right ) + 2\right )} x - x^{2} + x e^{\left (3 \, x^{2} + 24 \, x - 27\right )} - 8 \, x \log \left (x\right ) + 23 \, x \]

[In]

integrate(log(x)^2-8*log(x)+(6*x^2+24*x+1)*exp(3*x^2+24*x-27)-2*x+15,x, algorithm="maxima")

[Out]

(log(x)^2 - 2*log(x) + 2)*x - x^2 + x*e^(3*x^2 + 24*x - 27) - 8*x*log(x) + 23*x

Giac [A] (verification not implemented)

none

Time = 0.25 (sec) , antiderivative size = 33, normalized size of antiderivative = 1.32 \[ \int \left (15-2 x+e^{-27+24 x+3 x^2} \left (1+24 x+6 x^2\right )-8 \log (x)+\log ^2(x)\right ) \, dx=x \log \left (x\right )^{2} - x^{2} + x e^{\left (3 \, x^{2} + 24 \, x - 27\right )} - 10 \, x \log \left (x\right ) + 25 \, x \]

[In]

integrate(log(x)^2-8*log(x)+(6*x^2+24*x+1)*exp(3*x^2+24*x-27)-2*x+15,x, algorithm="giac")

[Out]

x*log(x)^2 - x^2 + x*e^(3*x^2 + 24*x - 27) - 10*x*log(x) + 25*x

Mupad [B] (verification not implemented)

Time = 9.35 (sec) , antiderivative size = 37, normalized size of antiderivative = 1.48 \[ \int \left (15-2 x+e^{-27+24 x+3 x^2} \left (1+24 x+6 x^2\right )-8 \log (x)+\log ^2(x)\right ) \, dx=x\,{\mathrm {e}}^{-27}\,\left ({\mathrm {e}}^{27}\,{\ln \left (x\right )}^2-10\,{\mathrm {e}}^{27}\,\ln \left (x\right )+25\,{\mathrm {e}}^{27}+{\mathrm {e}}^{3\,x^2+24\,x}-x\,{\mathrm {e}}^{27}\right ) \]

[In]

int(log(x)^2 - 8*log(x) - 2*x + exp(24*x + 3*x^2 - 27)*(24*x + 6*x^2 + 1) + 15,x)

[Out]

x*exp(-27)*(25*exp(27) + exp(24*x + 3*x^2) + exp(27)*log(x)^2 - x*exp(27) - 10*exp(27)*log(x))