\(\int \frac {2+2 x+5 x^3-10 x^4+15 x^5-20 x^6+(10 x^2-20 x^3+30 x^4-40 x^5) \log (x)+(5 x-10 x^2+15 x^3-20 x^4) \log ^2(x)}{5 x^3+10 x^2 \log (x)+5 x \log ^2(x)} \, dx\) [9399]

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

Optimal result

Integrand size = 96, antiderivative size = 26 \[ \int \frac {2+2 x+5 x^3-10 x^4+15 x^5-20 x^6+\left (10 x^2-20 x^3+30 x^4-40 x^5\right ) \log (x)+\left (5 x-10 x^2+15 x^3-20 x^4\right ) \log ^2(x)}{5 x^3+10 x^2 \log (x)+5 x \log ^2(x)} \, dx=-3+x-x^2+x^3-x^4-\frac {2}{5 (x+\log (x))} \]

[Out]

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

Rubi [A] (verified)

Time = 0.31 (sec) , antiderivative size = 25, normalized size of antiderivative = 0.96, number of steps used = 6, number of rules used = 4, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.042, Rules used = {6873, 12, 6874, 6818} \[ \int \frac {2+2 x+5 x^3-10 x^4+15 x^5-20 x^6+\left (10 x^2-20 x^3+30 x^4-40 x^5\right ) \log (x)+\left (5 x-10 x^2+15 x^3-20 x^4\right ) \log ^2(x)}{5 x^3+10 x^2 \log (x)+5 x \log ^2(x)} \, dx=-x^4+x^3-x^2+x-\frac {2}{5 (x+\log (x))} \]

[In]

Int[(2 + 2*x + 5*x^3 - 10*x^4 + 15*x^5 - 20*x^6 + (10*x^2 - 20*x^3 + 30*x^4 - 40*x^5)*Log[x] + (5*x - 10*x^2 +
 15*x^3 - 20*x^4)*Log[x]^2)/(5*x^3 + 10*x^2*Log[x] + 5*x*Log[x]^2),x]

[Out]

x - x^2 + x^3 - x^4 - 2/(5*(x + Log[x]))

Rule 12

Int[(a_)*(u_), x_Symbol] :> Dist[a, Int[u, x], x] /; FreeQ[a, x] &&  !MatchQ[u, (b_)*(v_) /; FreeQ[b, x]]

Rule 6818

Int[(u_)*(y_)^(m_.), x_Symbol] :> With[{q = DerivativeDivides[y, u, x]}, Simp[q*(y^(m + 1)/(m + 1)), x] /;  !F
alseQ[q]] /; FreeQ[m, x] && NeQ[m, -1]

Rule 6873

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

Rule 6874

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

Rubi steps \begin{align*} \text {integral}& = \int \frac {2+2 x+5 x^3-10 x^4+15 x^5-20 x^6+\left (10 x^2-20 x^3+30 x^4-40 x^5\right ) \log (x)+\left (5 x-10 x^2+15 x^3-20 x^4\right ) \log ^2(x)}{5 x (x+\log (x))^2} \, dx \\ & = \frac {1}{5} \int \frac {2+2 x+5 x^3-10 x^4+15 x^5-20 x^6+\left (10 x^2-20 x^3+30 x^4-40 x^5\right ) \log (x)+\left (5 x-10 x^2+15 x^3-20 x^4\right ) \log ^2(x)}{x (x+\log (x))^2} \, dx \\ & = \frac {1}{5} \int \left (-5 \left (-1+2 x-3 x^2+4 x^3\right )+\frac {2 (1+x)}{x (x+\log (x))^2}\right ) \, dx \\ & = \frac {2}{5} \int \frac {1+x}{x (x+\log (x))^2} \, dx-\int \left (-1+2 x-3 x^2+4 x^3\right ) \, dx \\ & = x-x^2+x^3-x^4-\frac {2}{5 (x+\log (x))} \\ \end{align*}

Mathematica [A] (verified)

Time = 0.27 (sec) , antiderivative size = 31, normalized size of antiderivative = 1.19 \[ \int \frac {2+2 x+5 x^3-10 x^4+15 x^5-20 x^6+\left (10 x^2-20 x^3+30 x^4-40 x^5\right ) \log (x)+\left (5 x-10 x^2+15 x^3-20 x^4\right ) \log ^2(x)}{5 x^3+10 x^2 \log (x)+5 x \log ^2(x)} \, dx=\frac {1}{5} \left (5 x-5 x^2+5 x^3-5 x^4-\frac {2}{x+\log (x)}\right ) \]

[In]

Integrate[(2 + 2*x + 5*x^3 - 10*x^4 + 15*x^5 - 20*x^6 + (10*x^2 - 20*x^3 + 30*x^4 - 40*x^5)*Log[x] + (5*x - 10
*x^2 + 15*x^3 - 20*x^4)*Log[x]^2)/(5*x^3 + 10*x^2*Log[x] + 5*x*Log[x]^2),x]

[Out]

(5*x - 5*x^2 + 5*x^3 - 5*x^4 - 2/(x + Log[x]))/5

Maple [A] (verified)

Time = 1.05 (sec) , antiderivative size = 24, normalized size of antiderivative = 0.92

method result size
risch \(-x^{4}+x^{3}-x^{2}+x -\frac {2}{5 \left (x +\ln \left (x \right )\right )}\) \(24\)
norman \(\frac {-\frac {2}{5}+x^{2}+x^{4}+x^{3} \ln \left (x \right )+x \ln \left (x \right )-x^{3}-x^{5}-x^{2} \ln \left (x \right )-x^{4} \ln \left (x \right )}{x +\ln \left (x \right )}\) \(50\)
default \(-\frac {2-5 x^{2}+5 x^{3}-5 x^{4}+5 x^{5}-5 x \ln \left (x \right )+5 x^{2} \ln \left (x \right )-5 x^{3} \ln \left (x \right )+5 x^{4} \ln \left (x \right )}{5 \left (x +\ln \left (x \right )\right )}\) \(57\)
parallelrisch \(\frac {-5 x^{5}-5 x^{4} \ln \left (x \right )+5 x^{4}+5 x^{3} \ln \left (x \right )-5 x^{3}-5 x^{2} \ln \left (x \right )+5 x^{2}+5 x \ln \left (x \right )-2}{5 x +5 \ln \left (x \right )}\) \(57\)

[In]

int(((-20*x^4+15*x^3-10*x^2+5*x)*ln(x)^2+(-40*x^5+30*x^4-20*x^3+10*x^2)*ln(x)-20*x^6+15*x^5-10*x^4+5*x^3+2*x+2
)/(5*x*ln(x)^2+10*x^2*ln(x)+5*x^3),x,method=_RETURNVERBOSE)

[Out]

-x^4+x^3-x^2+x-2/5/(x+ln(x))

Fricas [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 49 vs. \(2 (24) = 48\).

Time = 0.27 (sec) , antiderivative size = 49, normalized size of antiderivative = 1.88 \[ \int \frac {2+2 x+5 x^3-10 x^4+15 x^5-20 x^6+\left (10 x^2-20 x^3+30 x^4-40 x^5\right ) \log (x)+\left (5 x-10 x^2+15 x^3-20 x^4\right ) \log ^2(x)}{5 x^3+10 x^2 \log (x)+5 x \log ^2(x)} \, dx=-\frac {5 \, x^{5} - 5 \, x^{4} + 5 \, x^{3} - 5 \, x^{2} + 5 \, {\left (x^{4} - x^{3} + x^{2} - x\right )} \log \left (x\right ) + 2}{5 \, {\left (x + \log \left (x\right )\right )}} \]

[In]

integrate(((-20*x^4+15*x^3-10*x^2+5*x)*log(x)^2+(-40*x^5+30*x^4-20*x^3+10*x^2)*log(x)-20*x^6+15*x^5-10*x^4+5*x
^3+2*x+2)/(5*x*log(x)^2+10*x^2*log(x)+5*x^3),x, algorithm="fricas")

[Out]

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

Sympy [A] (verification not implemented)

Time = 0.05 (sec) , antiderivative size = 20, normalized size of antiderivative = 0.77 \[ \int \frac {2+2 x+5 x^3-10 x^4+15 x^5-20 x^6+\left (10 x^2-20 x^3+30 x^4-40 x^5\right ) \log (x)+\left (5 x-10 x^2+15 x^3-20 x^4\right ) \log ^2(x)}{5 x^3+10 x^2 \log (x)+5 x \log ^2(x)} \, dx=- x^{4} + x^{3} - x^{2} + x - \frac {2}{5 x + 5 \log {\left (x \right )}} \]

[In]

integrate(((-20*x**4+15*x**3-10*x**2+5*x)*ln(x)**2+(-40*x**5+30*x**4-20*x**3+10*x**2)*ln(x)-20*x**6+15*x**5-10
*x**4+5*x**3+2*x+2)/(5*x*ln(x)**2+10*x**2*ln(x)+5*x**3),x)

[Out]

-x**4 + x**3 - x**2 + x - 2/(5*x + 5*log(x))

Maxima [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 49 vs. \(2 (24) = 48\).

Time = 0.23 (sec) , antiderivative size = 49, normalized size of antiderivative = 1.88 \[ \int \frac {2+2 x+5 x^3-10 x^4+15 x^5-20 x^6+\left (10 x^2-20 x^3+30 x^4-40 x^5\right ) \log (x)+\left (5 x-10 x^2+15 x^3-20 x^4\right ) \log ^2(x)}{5 x^3+10 x^2 \log (x)+5 x \log ^2(x)} \, dx=-\frac {5 \, x^{5} - 5 \, x^{4} + 5 \, x^{3} - 5 \, x^{2} + 5 \, {\left (x^{4} - x^{3} + x^{2} - x\right )} \log \left (x\right ) + 2}{5 \, {\left (x + \log \left (x\right )\right )}} \]

[In]

integrate(((-20*x^4+15*x^3-10*x^2+5*x)*log(x)^2+(-40*x^5+30*x^4-20*x^3+10*x^2)*log(x)-20*x^6+15*x^5-10*x^4+5*x
^3+2*x+2)/(5*x*log(x)^2+10*x^2*log(x)+5*x^3),x, algorithm="maxima")

[Out]

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

Giac [A] (verification not implemented)

none

Time = 0.28 (sec) , antiderivative size = 23, normalized size of antiderivative = 0.88 \[ \int \frac {2+2 x+5 x^3-10 x^4+15 x^5-20 x^6+\left (10 x^2-20 x^3+30 x^4-40 x^5\right ) \log (x)+\left (5 x-10 x^2+15 x^3-20 x^4\right ) \log ^2(x)}{5 x^3+10 x^2 \log (x)+5 x \log ^2(x)} \, dx=-x^{4} + x^{3} - x^{2} + x - \frac {2}{5 \, {\left (x + \log \left (x\right )\right )}} \]

[In]

integrate(((-20*x^4+15*x^3-10*x^2+5*x)*log(x)^2+(-40*x^5+30*x^4-20*x^3+10*x^2)*log(x)-20*x^6+15*x^5-10*x^4+5*x
^3+2*x+2)/(5*x*log(x)^2+10*x^2*log(x)+5*x^3),x, algorithm="giac")

[Out]

-x^4 + x^3 - x^2 + x - 2/5/(x + log(x))

Mupad [B] (verification not implemented)

Time = 15.83 (sec) , antiderivative size = 27, normalized size of antiderivative = 1.04 \[ \int \frac {2+2 x+5 x^3-10 x^4+15 x^5-20 x^6+\left (10 x^2-20 x^3+30 x^4-40 x^5\right ) \log (x)+\left (5 x-10 x^2+15 x^3-20 x^4\right ) \log ^2(x)}{5 x^3+10 x^2 \log (x)+5 x \log ^2(x)} \, dx=x-\frac {2}{5\,\left (x+\ln \left (x\right )\right )}-x^2+x^3-x^4 \]

[In]

int((2*x + log(x)^2*(5*x - 10*x^2 + 15*x^3 - 20*x^4) + log(x)*(10*x^2 - 20*x^3 + 30*x^4 - 40*x^5) + 5*x^3 - 10
*x^4 + 15*x^5 - 20*x^6 + 2)/(5*x*log(x)^2 + 10*x^2*log(x) + 5*x^3),x)

[Out]

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