\(\int \frac {250-75 x^4-100 \log (x)}{-6 x-x^5+4 x \log (x)} \, dx\) [3069]

   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 = 28, antiderivative size = 20 \[ \int \frac {250-75 x^4-100 \log (x)}{-6 x-x^5+4 x \log (x)} \, dx=5 \left (4-5 \log \left (\frac {x}{6+x^4-4 \log (x)}\right )\right ) \]

[Out]

20-25*ln(x/(6+x^4-4*ln(x)))

Rubi [A] (verified)

Time = 0.12 (sec) , antiderivative size = 17, normalized size of antiderivative = 0.85, number of steps used = 5, number of rules used = 4, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.143, Rules used = {6873, 12, 6874, 6816} \[ \int \frac {250-75 x^4-100 \log (x)}{-6 x-x^5+4 x \log (x)} \, dx=25 \log \left (x^4-4 \log (x)+6\right )-25 \log (x) \]

[In]

Int[(250 - 75*x^4 - 100*Log[x])/(-6*x - x^5 + 4*x*Log[x]),x]

[Out]

-25*Log[x] + 25*Log[6 + x^4 - 4*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 6816

Int[(u_)/(y_), x_Symbol] :> With[{q = DerivativeDivides[y, u, x]}, Simp[q*Log[RemoveContent[y, x]], x] /;  !Fa
lseQ[q]]

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 {25 \left (-10+3 x^4+4 \log (x)\right )}{6 x+x^5-4 x \log (x)} \, dx \\ & = 25 \int \frac {-10+3 x^4+4 \log (x)}{6 x+x^5-4 x \log (x)} \, dx \\ & = 25 \int \left (-\frac {1}{x}+\frac {4 \left (-1+x^4\right )}{x \left (6+x^4-4 \log (x)\right )}\right ) \, dx \\ & = -25 \log (x)+100 \int \frac {-1+x^4}{x \left (6+x^4-4 \log (x)\right )} \, dx \\ & = -25 \log (x)+25 \log \left (6+x^4-4 \log (x)\right ) \\ \end{align*}

Mathematica [A] (verified)

Time = 0.08 (sec) , antiderivative size = 17, normalized size of antiderivative = 0.85 \[ \int \frac {250-75 x^4-100 \log (x)}{-6 x-x^5+4 x \log (x)} \, dx=25 \left (-\log (x)+\log \left (6+x^4-4 \log (x)\right )\right ) \]

[In]

Integrate[(250 - 75*x^4 - 100*Log[x])/(-6*x - x^5 + 4*x*Log[x]),x]

[Out]

25*(-Log[x] + Log[6 + x^4 - 4*Log[x]])

Maple [A] (verified)

Time = 0.84 (sec) , antiderivative size = 18, normalized size of antiderivative = 0.90

method result size
norman \(-25 \ln \left (x \right )+25 \ln \left (6+x^{4}-4 \ln \left (x \right )\right )\) \(18\)
risch \(-25 \ln \left (x \right )+25 \ln \left (-\frac {x^{4}}{4}+\ln \left (x \right )-\frac {3}{2}\right )\) \(18\)
parallelrisch \(-25 \ln \left (x \right )+25 \ln \left (6+x^{4}-4 \ln \left (x \right )\right )\) \(18\)
default \(-25 \ln \left (x \right )+25 \ln \left (-x^{4}+4 \ln \left (x \right )-6\right )\) \(20\)

[In]

int((-100*ln(x)-75*x^4+250)/(4*x*ln(x)-x^5-6*x),x,method=_RETURNVERBOSE)

[Out]

-25*ln(x)+25*ln(6+x^4-4*ln(x))

Fricas [A] (verification not implemented)

none

Time = 0.27 (sec) , antiderivative size = 19, normalized size of antiderivative = 0.95 \[ \int \frac {250-75 x^4-100 \log (x)}{-6 x-x^5+4 x \log (x)} \, dx=25 \, \log \left (-x^{4} + 4 \, \log \left (x\right ) - 6\right ) - 25 \, \log \left (x\right ) \]

[In]

integrate((-100*log(x)-75*x^4+250)/(4*x*log(x)-x^5-6*x),x, algorithm="fricas")

[Out]

25*log(-x^4 + 4*log(x) - 6) - 25*log(x)

Sympy [A] (verification not implemented)

Time = 0.09 (sec) , antiderivative size = 19, normalized size of antiderivative = 0.95 \[ \int \frac {250-75 x^4-100 \log (x)}{-6 x-x^5+4 x \log (x)} \, dx=- 25 \log {\left (x \right )} + 25 \log {\left (- \frac {x^{4}}{4} + \log {\left (x \right )} - \frac {3}{2} \right )} \]

[In]

integrate((-100*ln(x)-75*x**4+250)/(4*x*ln(x)-x**5-6*x),x)

[Out]

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

Maxima [A] (verification not implemented)

none

Time = 0.24 (sec) , antiderivative size = 17, normalized size of antiderivative = 0.85 \[ \int \frac {250-75 x^4-100 \log (x)}{-6 x-x^5+4 x \log (x)} \, dx=25 \, \log \left (-\frac {1}{4} \, x^{4} + \log \left (x\right ) - \frac {3}{2}\right ) - 25 \, \log \left (x\right ) \]

[In]

integrate((-100*log(x)-75*x^4+250)/(4*x*log(x)-x^5-6*x),x, algorithm="maxima")

[Out]

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

Giac [A] (verification not implemented)

none

Time = 0.26 (sec) , antiderivative size = 19, normalized size of antiderivative = 0.95 \[ \int \frac {250-75 x^4-100 \log (x)}{-6 x-x^5+4 x \log (x)} \, dx=25 \, \log \left (-x^{4} + 4 \, \log \left (x\right ) - 6\right ) - 25 \, \log \left (x\right ) \]

[In]

integrate((-100*log(x)-75*x^4+250)/(4*x*log(x)-x^5-6*x),x, algorithm="giac")

[Out]

25*log(-x^4 + 4*log(x) - 6) - 25*log(x)

Mupad [B] (verification not implemented)

Time = 9.39 (sec) , antiderivative size = 17, normalized size of antiderivative = 0.85 \[ \int \frac {250-75 x^4-100 \log (x)}{-6 x-x^5+4 x \log (x)} \, dx=25\,\ln \left (x^4-4\,\ln \left (x\right )+6\right )-25\,\ln \left (x\right ) \]

[In]

int((100*log(x) + 75*x^4 - 250)/(6*x - 4*x*log(x) + x^5),x)

[Out]

25*log(x^4 - 4*log(x) + 6) - 25*log(x)