\(\int \frac {-4-10 x-14 x^2-6 x^3}{4 x+4 x^2+3 x^3+x^4} \, dx\) [3189]

Optimal result

Integrand size = 35, antiderivative size = 25 \[ \int \frac {-4-10 x-14 x^2-6 x^3}{4 x+4 x^2+3 x^3+x^4} \, dx=\log \left (\frac {4}{x (2+x) \left (2+x+x^2\right )^2 (-3+\log (5))}\right ) \]

[Out]

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

Rubi [A] (verified)

Time = 0.03 (sec) , antiderivative size = 20, normalized size of antiderivative = 0.80, number of steps used = 3, number of rules used = 2, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.057, Rules used = {2099, 642} \[ \int \frac {-4-10 x-14 x^2-6 x^3}{4 x+4 x^2+3 x^3+x^4} \, dx=-2 \log \left (x^2+x+2\right )-\log (x)-\log (x+2) \]

[In]

Int[(-4 - 10*x - 14*x^2 - 6*x^3)/(4*x + 4*x^2 + 3*x^3 + x^4),x]

[Out]

-Log[x] - Log[2 + x] - 2*Log[2 + x + x^2]

Rule 642

Int[((d_) + (e_.)*(x_))/((a_.) + (b_.)*(x_) + (c_.)*(x_)^2), x_Symbol] :> Simp[d*(Log[RemoveContent[a + b*x +
c*x^2, x]]/b), x] /; FreeQ[{a, b, c, d, e}, x] && EqQ[2*c*d - b*e, 0]

Rule 2099

Int[(P_)^(p_)*(Q_)^(q_.), x_Symbol] :> With[{PP = Factor[P]}, Int[ExpandIntegrand[PP^p*Q^q, x], x] /;  !SumQ[N
onfreeFactors[PP, x]]] /; FreeQ[q, x] && PolyQ[P, x] && PolyQ[Q, x] && IntegerQ[p] && NeQ[P, x]

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

Mathematica [A] (verified)

Time = 0.01 (sec) , antiderivative size = 24, normalized size of antiderivative = 0.96 \[ \int \frac {-4-10 x-14 x^2-6 x^3}{4 x+4 x^2+3 x^3+x^4} \, dx=-2 \left (\frac {\log (x)}{2}+\frac {1}{2} \log (2+x)+\log \left (2+x+x^2\right )\right ) \]

[In]

Integrate[(-4 - 10*x - 14*x^2 - 6*x^3)/(4*x + 4*x^2 + 3*x^3 + x^4),x]

[Out]

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

Maple [A] (verified)

Time = 0.21 (sec) , antiderivative size = 21, normalized size of antiderivative = 0.84

method	result	size
default	\(-\ln \left (2+x \right )-2 \ln \left (x^{2}+x +2\right )-\ln \left (x \right )\)	\(21\)
norman	\(-\ln \left (2+x \right )-2 \ln \left (x^{2}+x +2\right )-\ln \left (x \right )\)	\(21\)
risch	\(-2 \ln \left (x^{2}+x +2\right )-\ln \left (x^{2}+2 x \right )\)	\(21\)
parallelrisch	\(-\ln \left (2+x \right )-2 \ln \left (x^{2}+x +2\right )-\ln \left (x \right )\)	\(21\)

[In]

int((-6*x^3-14*x^2-10*x-4)/(x^4+3*x^3+4*x^2+4*x),x,method=_RETURNVERBOSE)

[Out]

-ln(2+x)-2*ln(x^2+x+2)-ln(x)

Fricas [A] (verification not implemented)

none

Time = 0.25 (sec) , antiderivative size = 20, normalized size of antiderivative = 0.80 \[ \int \frac {-4-10 x-14 x^2-6 x^3}{4 x+4 x^2+3 x^3+x^4} \, dx=-\log \left (x^{2} + 2 \, x\right ) - 2 \, \log \left (x^{2} + x + 2\right ) \]

[In]

integrate((-6*x^3-14*x^2-10*x-4)/(x^4+3*x^3+4*x^2+4*x),x, algorithm="fricas")

[Out]

-log(x^2 + 2*x) - 2*log(x^2 + x + 2)

Sympy [A] (verification not implemented)

Time = 0.08 (sec) , antiderivative size = 19, normalized size of antiderivative = 0.76 \[ \int \frac {-4-10 x-14 x^2-6 x^3}{4 x+4 x^2+3 x^3+x^4} \, dx=- \log {\left (x^{2} + 2 x \right )} - 2 \log {\left (x^{2} + x + 2 \right )} \]

[In]

integrate((-6*x**3-14*x**2-10*x-4)/(x**4+3*x**3+4*x**2+4*x),x)

[Out]

-log(x**2 + 2*x) - 2*log(x**2 + x + 2)

Maxima [A] (verification not implemented)

none

Time = 0.18 (sec) , antiderivative size = 20, normalized size of antiderivative = 0.80 \[ \int \frac {-4-10 x-14 x^2-6 x^3}{4 x+4 x^2+3 x^3+x^4} \, dx=-2 \, \log \left (x^{2} + x + 2\right ) - \log \left (x + 2\right ) - \log \left (x\right ) \]

[In]

integrate((-6*x^3-14*x^2-10*x-4)/(x^4+3*x^3+4*x^2+4*x),x, algorithm="maxima")

[Out]

-2*log(x^2 + x + 2) - log(x + 2) - log(x)

Giac [A] (verification not implemented)

none

Time = 0.25 (sec) , antiderivative size = 22, normalized size of antiderivative = 0.88 \[ \int \frac {-4-10 x-14 x^2-6 x^3}{4 x+4 x^2+3 x^3+x^4} \, dx=-2 \, \log \left (x^{2} + x + 2\right ) - \log \left ({\left | x + 2 \right |}\right ) - \log \left ({\left | x \right |}\right ) \]

[In]

integrate((-6*x^3-14*x^2-10*x-4)/(x^4+3*x^3+4*x^2+4*x),x, algorithm="giac")

[Out]

-2*log(x^2 + x + 2) - log(abs(x + 2)) - log(abs(x))

Mupad [B] (verification not implemented)

Time = 0.09 (sec) , antiderivative size = 18, normalized size of antiderivative = 0.72 \[ \int \frac {-4-10 x-14 x^2-6 x^3}{4 x+4 x^2+3 x^3+x^4} \, dx=-\ln \left (x\,\left (x+2\right )\right )-2\,\ln \left (x^2+x+2\right ) \]

[In]

int(-(10*x + 14*x^2 + 6*x^3 + 4)/(4*x + 4*x^2 + 3*x^3 + x^4),x)

[Out]

- log(x*(x + 2)) - 2*log(x + x^2 + 2)