\(\int \frac {24 e^{-2 x+2 x^2}+e^{-x+x^2} x+e^{-x+x^2} (-24+x^2-2 x^3) \log (x)+6 \log ^2(x)}{36 e^{-2 x+2 x^2} x^2-36 e^{-x+x^2} x^2 \log (x)+9 x^2 \log ^2(x)} \, dx\) [7959]

   Optimal result
   Rubi [F]
   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 = 98, antiderivative size = 30 \[ \int \frac {24 e^{-2 x+2 x^2}+e^{-x+x^2} x+e^{-x+x^2} \left (-24+x^2-2 x^3\right ) \log (x)+6 \log ^2(x)}{36 e^{-2 x+2 x^2} x^2-36 e^{-x+x^2} x^2 \log (x)+9 x^2 \log ^2(x)} \, dx=\frac {-2+x-\frac {x}{-6+3 e^{x-x^2} \log (x)}}{3 x} \]

[Out]

1/3*(x-x/(3*ln(x)/exp(x^2-x)-6)-2)/x

Rubi [F]

\[ \int \frac {24 e^{-2 x+2 x^2}+e^{-x+x^2} x+e^{-x+x^2} \left (-24+x^2-2 x^3\right ) \log (x)+6 \log ^2(x)}{36 e^{-2 x+2 x^2} x^2-36 e^{-x+x^2} x^2 \log (x)+9 x^2 \log ^2(x)} \, dx=\int \frac {24 e^{-2 x+2 x^2}+e^{-x+x^2} x+e^{-x+x^2} \left (-24+x^2-2 x^3\right ) \log (x)+6 \log ^2(x)}{36 e^{-2 x+2 x^2} x^2-36 e^{-x+x^2} x^2 \log (x)+9 x^2 \log ^2(x)} \, dx \]

[In]

Int[(24*E^(-2*x + 2*x^2) + E^(-x + x^2)*x + E^(-x + x^2)*(-24 + x^2 - 2*x^3)*Log[x] + 6*Log[x]^2)/(36*E^(-2*x
+ 2*x^2)*x^2 - 36*E^(-x + x^2)*x^2*Log[x] + 9*x^2*Log[x]^2),x]

[Out]

-2/(3*x) + Defer[Int][E^x/(x*(2*E^x^2 - E^x*Log[x])), x]/18 + Defer[Int][(E^(2*x)*Log[x])/(x*(-2*E^x^2 + E^x*L
og[x])^2), x]/18 + Defer[Int][(E^(2*x)*Log[x]^2)/(-2*E^x^2 + E^x*Log[x])^2, x]/18 - Defer[Int][(E^(2*x)*x*Log[
x]^2)/(-2*E^x^2 + E^x*Log[x])^2, x]/9 - Defer[Int][(E^x*Log[x])/(-2*E^x^2 + E^x*Log[x]), x]/18 + Defer[Int][(E
^x*x*Log[x])/(-2*E^x^2 + E^x*Log[x]), x]/9

Rubi steps \begin{align*} \text {integral}& = \int \frac {e^{2 x} \left (24 e^{-2 x+2 x^2}+e^{-x+x^2} x+e^{-x+x^2} \left (-24+x^2-2 x^3\right ) \log (x)+6 \log ^2(x)\right )}{9 x^2 \left (2 e^{x^2}-e^x \log (x)\right )^2} \, dx \\ & = \frac {1}{9} \int \frac {e^{2 x} \left (24 e^{-2 x+2 x^2}+e^{-x+x^2} x+e^{-x+x^2} \left (-24+x^2-2 x^3\right ) \log (x)+6 \log ^2(x)\right )}{x^2 \left (2 e^{x^2}-e^x \log (x)\right )^2} \, dx \\ & = \frac {1}{9} \int \left (\frac {6}{x^2}-\frac {e^{2 x} \log (x) \left (-1-x \log (x)+2 x^2 \log (x)\right )}{2 x \left (-2 e^{x^2}+e^x \log (x)\right )^2}+\frac {e^x \left (-1-x \log (x)+2 x^2 \log (x)\right )}{2 x \left (-2 e^{x^2}+e^x \log (x)\right )}\right ) \, dx \\ & = -\frac {2}{3 x}-\frac {1}{18} \int \frac {e^{2 x} \log (x) \left (-1-x \log (x)+2 x^2 \log (x)\right )}{x \left (-2 e^{x^2}+e^x \log (x)\right )^2} \, dx+\frac {1}{18} \int \frac {e^x \left (-1-x \log (x)+2 x^2 \log (x)\right )}{x \left (-2 e^{x^2}+e^x \log (x)\right )} \, dx \\ & = -\frac {2}{3 x}-\frac {1}{18} \int \left (-\frac {e^{2 x} \log (x)}{x \left (-2 e^{x^2}+e^x \log (x)\right )^2}-\frac {e^{2 x} \log ^2(x)}{\left (-2 e^{x^2}+e^x \log (x)\right )^2}+\frac {2 e^{2 x} x \log ^2(x)}{\left (-2 e^{x^2}+e^x \log (x)\right )^2}\right ) \, dx+\frac {1}{18} \int \left (\frac {e^x}{x \left (2 e^{x^2}-e^x \log (x)\right )}-\frac {e^x \log (x)}{-2 e^{x^2}+e^x \log (x)}+\frac {2 e^x x \log (x)}{-2 e^{x^2}+e^x \log (x)}\right ) \, dx \\ & = -\frac {2}{3 x}+\frac {1}{18} \int \frac {e^x}{x \left (2 e^{x^2}-e^x \log (x)\right )} \, dx+\frac {1}{18} \int \frac {e^{2 x} \log (x)}{x \left (-2 e^{x^2}+e^x \log (x)\right )^2} \, dx+\frac {1}{18} \int \frac {e^{2 x} \log ^2(x)}{\left (-2 e^{x^2}+e^x \log (x)\right )^2} \, dx-\frac {1}{18} \int \frac {e^x \log (x)}{-2 e^{x^2}+e^x \log (x)} \, dx-\frac {1}{9} \int \frac {e^{2 x} x \log ^2(x)}{\left (-2 e^{x^2}+e^x \log (x)\right )^2} \, dx+\frac {1}{9} \int \frac {e^x x \log (x)}{-2 e^{x^2}+e^x \log (x)} \, dx \\ \end{align*}

Mathematica [A] (verified)

Time = 0.67 (sec) , antiderivative size = 33, normalized size of antiderivative = 1.10 \[ \int \frac {24 e^{-2 x+2 x^2}+e^{-x+x^2} x+e^{-x+x^2} \left (-24+x^2-2 x^3\right ) \log (x)+6 \log ^2(x)}{36 e^{-2 x+2 x^2} x^2-36 e^{-x+x^2} x^2 \log (x)+9 x^2 \log ^2(x)} \, dx=\frac {1}{9} \left (-\frac {6}{x}-\frac {e^{x^2}}{-2 e^{x^2}+e^x \log (x)}\right ) \]

[In]

Integrate[(24*E^(-2*x + 2*x^2) + E^(-x + x^2)*x + E^(-x + x^2)*(-24 + x^2 - 2*x^3)*Log[x] + 6*Log[x]^2)/(36*E^
(-2*x + 2*x^2)*x^2 - 36*E^(-x + x^2)*x^2*Log[x] + 9*x^2*Log[x]^2),x]

[Out]

(-6/x - E^x^2/(-2*E^x^2 + E^x*Log[x]))/9

Maple [A] (verified)

Time = 0.13 (sec) , antiderivative size = 30, normalized size of antiderivative = 1.00

method result size
risch \(-\frac {2}{3 x}+\frac {{\mathrm e}^{x \left (-1+x \right )}}{18 \,{\mathrm e}^{x \left (-1+x \right )}-9 \ln \left (x \right )}\) \(30\)
parallelrisch \(\frac {-x \ln \left (x \right )-12 \ln \left (x \right )+24 \,{\mathrm e}^{x^{2}-x}}{18 x \left (\ln \left (x \right )-2 \,{\mathrm e}^{x^{2}-x}\right )}\) \(41\)

[In]

int((6*ln(x)^2+(-2*x^3+x^2-24)*exp(x^2-x)*ln(x)+24*exp(x^2-x)^2+x*exp(x^2-x))/(9*x^2*ln(x)^2-36*x^2*exp(x^2-x)
*ln(x)+36*x^2*exp(x^2-x)^2),x,method=_RETURNVERBOSE)

[Out]

-2/3/x+1/9*exp(x*(-1+x))/(2*exp(x*(-1+x))-ln(x))

Fricas [A] (verification not implemented)

none

Time = 0.28 (sec) , antiderivative size = 38, normalized size of antiderivative = 1.27 \[ \int \frac {24 e^{-2 x+2 x^2}+e^{-x+x^2} x+e^{-x+x^2} \left (-24+x^2-2 x^3\right ) \log (x)+6 \log ^2(x)}{36 e^{-2 x+2 x^2} x^2-36 e^{-x+x^2} x^2 \log (x)+9 x^2 \log ^2(x)} \, dx=\frac {{\left (x - 12\right )} e^{\left (x^{2} - x\right )} + 6 \, \log \left (x\right )}{9 \, {\left (2 \, x e^{\left (x^{2} - x\right )} - x \log \left (x\right )\right )}} \]

[In]

integrate((6*log(x)^2+(-2*x^3+x^2-24)*exp(x^2-x)*log(x)+24*exp(x^2-x)^2+x*exp(x^2-x))/(9*x^2*log(x)^2-36*x^2*e
xp(x^2-x)*log(x)+36*x^2*exp(x^2-x)^2),x, algorithm="fricas")

[Out]

1/9*((x - 12)*e^(x^2 - x) + 6*log(x))/(2*x*e^(x^2 - x) - x*log(x))

Sympy [A] (verification not implemented)

Time = 0.08 (sec) , antiderivative size = 20, normalized size of antiderivative = 0.67 \[ \int \frac {24 e^{-2 x+2 x^2}+e^{-x+x^2} x+e^{-x+x^2} \left (-24+x^2-2 x^3\right ) \log (x)+6 \log ^2(x)}{36 e^{-2 x+2 x^2} x^2-36 e^{-x+x^2} x^2 \log (x)+9 x^2 \log ^2(x)} \, dx=\frac {\log {\left (x \right )}}{36 e^{x^{2} - x} - 18 \log {\left (x \right )}} - \frac {2}{3 x} \]

[In]

integrate((6*ln(x)**2+(-2*x**3+x**2-24)*exp(x**2-x)*ln(x)+24*exp(x**2-x)**2+x*exp(x**2-x))/(9*x**2*ln(x)**2-36
*x**2*exp(x**2-x)*ln(x)+36*x**2*exp(x**2-x)**2),x)

[Out]

log(x)/(36*exp(x**2 - x) - 18*log(x)) - 2/(3*x)

Maxima [A] (verification not implemented)

none

Time = 0.25 (sec) , antiderivative size = 33, normalized size of antiderivative = 1.10 \[ \int \frac {24 e^{-2 x+2 x^2}+e^{-x+x^2} x+e^{-x+x^2} \left (-24+x^2-2 x^3\right ) \log (x)+6 \log ^2(x)}{36 e^{-2 x+2 x^2} x^2-36 e^{-x+x^2} x^2 \log (x)+9 x^2 \log ^2(x)} \, dx=-\frac {{\left (x + 12\right )} e^{x} \log \left (x\right ) - 24 \, e^{\left (x^{2}\right )}}{18 \, {\left (x e^{x} \log \left (x\right ) - 2 \, x e^{\left (x^{2}\right )}\right )}} \]

[In]

integrate((6*log(x)^2+(-2*x^3+x^2-24)*exp(x^2-x)*log(x)+24*exp(x^2-x)^2+x*exp(x^2-x))/(9*x^2*log(x)^2-36*x^2*e
xp(x^2-x)*log(x)+36*x^2*exp(x^2-x)^2),x, algorithm="maxima")

[Out]

-1/18*((x + 12)*e^x*log(x) - 24*e^(x^2))/(x*e^x*log(x) - 2*x*e^(x^2))

Giac [A] (verification not implemented)

none

Time = 0.32 (sec) , antiderivative size = 40, normalized size of antiderivative = 1.33 \[ \int \frac {24 e^{-2 x+2 x^2}+e^{-x+x^2} x+e^{-x+x^2} \left (-24+x^2-2 x^3\right ) \log (x)+6 \log ^2(x)}{36 e^{-2 x+2 x^2} x^2-36 e^{-x+x^2} x^2 \log (x)+9 x^2 \log ^2(x)} \, dx=\frac {x \log \left (x\right ) - 24 \, e^{\left (x^{2} - x\right )} + 12 \, \log \left (x\right )}{18 \, {\left (2 \, x e^{\left (x^{2} - x\right )} - x \log \left (x\right )\right )}} \]

[In]

integrate((6*log(x)^2+(-2*x^3+x^2-24)*exp(x^2-x)*log(x)+24*exp(x^2-x)^2+x*exp(x^2-x))/(9*x^2*log(x)^2-36*x^2*e
xp(x^2-x)*log(x)+36*x^2*exp(x^2-x)^2),x, algorithm="giac")

[Out]

1/18*(x*log(x) - 24*e^(x^2 - x) + 12*log(x))/(2*x*e^(x^2 - x) - x*log(x))

Mupad [B] (verification not implemented)

Time = 13.48 (sec) , antiderivative size = 26, normalized size of antiderivative = 0.87 \[ \int \frac {24 e^{-2 x+2 x^2}+e^{-x+x^2} x+e^{-x+x^2} \left (-24+x^2-2 x^3\right ) \log (x)+6 \log ^2(x)}{36 e^{-2 x+2 x^2} x^2-36 e^{-x+x^2} x^2 \log (x)+9 x^2 \log ^2(x)} \, dx=\frac {\ln \left (x\right )}{18\,\left (2\,{\mathrm {e}}^{x^2-x}-\ln \left (x\right )\right )}-\frac {2}{3\,x} \]

[In]

int((24*exp(2*x^2 - 2*x) + 6*log(x)^2 + x*exp(x^2 - x) - exp(x^2 - x)*log(x)*(2*x^3 - x^2 + 24))/(36*x^2*exp(2
*x^2 - 2*x) + 9*x^2*log(x)^2 - 36*x^2*exp(x^2 - x)*log(x)),x)

[Out]

log(x)/(18*(2*exp(x^2 - x) - log(x))) - 2/(3*x)