\(\int \frac {2-156 x+122 x^2-8 x^3+1352 x^4-208 x^5+8 x^6}{1+52 x^2-4 x^3+676 x^4-104 x^5+4 x^6} \, dx\) [7752]

Optimal result

Integrand size = 60, antiderivative size = 24 \[ \int \frac {2-156 x+122 x^2-8 x^3+1352 x^4-208 x^5+8 x^6}{1+52 x^2-4 x^3+676 x^4-104 x^5+4 x^6} \, dx=2 x+\frac {3}{1+x^2+(25-2 x) x^2}+\log (2) \]

[Out]

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

Rubi [A] (verified)

Time = 0.06 (sec) , antiderivative size = 20, normalized size of antiderivative = 0.83, number of steps used = 3, number of rules used = 2, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.033, Rules used = {2099, 1602} \[ \int \frac {2-156 x+122 x^2-8 x^3+1352 x^4-208 x^5+8 x^6}{1+52 x^2-4 x^3+676 x^4-104 x^5+4 x^6} \, dx=\frac {3}{-2 x^3+26 x^2+1}+2 x \]

[In]

Int[(2 - 156*x + 122*x^2 - 8*x^3 + 1352*x^4 - 208*x^5 + 8*x^6)/(1 + 52*x^2 - 4*x^3 + 676*x^4 - 104*x^5 + 4*x^6
),x]

[Out]

2*x + 3/(1 + 26*x^2 - 2*x^3)

Rule 1602

Int[(Pp_)*(Qq_)^(m_.), x_Symbol] :> With[{p = Expon[Pp, x], q = Expon[Qq, x]}, Simp[Coeff[Pp, x, p]*x^(p - q +
1)*(Qq^(m + 1)/((p + m*q + 1)*Coeff[Qq, x, q])), x] /; NeQ[p + m*q + 1, 0] && EqQ[(p + m*q + 1)*Coeff[Qq, x,
q]*Pp, Coeff[Pp, x, p]*x^(p - q)*((p - q + 1)*Qq + (m + 1)*x*D[Qq, x])]] /; FreeQ[m, x] && PolyQ[Pp, x] && Pol
yQ[Qq, x] && NeQ[m, -1]

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 (2+\frac {6 x (-26+3 x)}{\left (-1-26 x^2+2 x^3\right )^2}\right ) \, dx \\ & = 2 x+6 \int \frac {x (-26+3 x)}{\left (-1-26 x^2+2 x^3\right )^2} \, dx \\ & = 2 x+\frac {3}{1+26 x^2-2 x^3} \\ \end{align*}

Mathematica [A] (verified)

Time = 0.02 (sec) , antiderivative size = 22, normalized size of antiderivative = 0.92 \[ \int \frac {2-156 x+122 x^2-8 x^3+1352 x^4-208 x^5+8 x^6}{1+52 x^2-4 x^3+676 x^4-104 x^5+4 x^6} \, dx=2 \left (x-\frac {3}{2 \left (-1-26 x^2+2 x^3\right )}\right ) \]

[In]

Integrate[(2 - 156*x + 122*x^2 - 8*x^3 + 1352*x^4 - 208*x^5 + 8*x^6)/(1 + 52*x^2 - 4*x^3 + 676*x^4 - 104*x^5 +
4*x^6),x]

[Out]

2*(x - 3/(2*(-1 - 26*x^2 + 2*x^3)))

Maple [A] (verified)

Time = 0.04 (sec) , antiderivative size = 19, normalized size of antiderivative = 0.79

method	result	size
default	\(2 x -\frac {3}{2 \left (x^{3}-13 x^{2}-\frac {1}{2}\right )}\)	\(19\)
risch	\(2 x -\frac {3}{2 \left (x^{3}-13 x^{2}-\frac {1}{2}\right )}\)	\(19\)
norman	\(\frac {4 x^{4}-676 x^{2}-2 x -29}{2 x^{3}-26 x^{2}-1}\)	\(31\)
parallelrisch	\(\frac {8 x^{4}-1352 x^{2}-4 x -58}{4 x^{3}-52 x^{2}-2}\)	\(32\)
gosper	\(\frac {2 x \left (2 x^{3}-29 x^{2}+39 x -1\right )}{2 x^{3}-26 x^{2}-1}\)	\(33\)

[In]

int((8*x^6-208*x^5+1352*x^4-8*x^3+122*x^2-156*x+2)/(4*x^6-104*x^5+676*x^4-4*x^3+52*x^2+1),x,method=_RETURNVERB
OSE)

[Out]

2*x-3/2/(x^3-13*x^2-1/2)

Fricas [A] (verification not implemented)

none

Time = 0.29 (sec) , antiderivative size = 30, normalized size of antiderivative = 1.25 \[ \int \frac {2-156 x+122 x^2-8 x^3+1352 x^4-208 x^5+8 x^6}{1+52 x^2-4 x^3+676 x^4-104 x^5+4 x^6} \, dx=\frac {4 \, x^{4} - 52 \, x^{3} - 2 \, x - 3}{2 \, x^{3} - 26 \, x^{2} - 1} \]

[In]

integrate((8*x^6-208*x^5+1352*x^4-8*x^3+122*x^2-156*x+2)/(4*x^6-104*x^5+676*x^4-4*x^3+52*x^2+1),x, algorithm="
fricas")

[Out]

(4*x^4 - 52*x^3 - 2*x - 3)/(2*x^3 - 26*x^2 - 1)

Sympy [A] (verification not implemented)

Time = 0.05 (sec) , antiderivative size = 15, normalized size of antiderivative = 0.62 \[ \int \frac {2-156 x+122 x^2-8 x^3+1352 x^4-208 x^5+8 x^6}{1+52 x^2-4 x^3+676 x^4-104 x^5+4 x^6} \, dx=2 x - \frac {3}{2 x^{3} - 26 x^{2} - 1} \]

[In]

integrate((8*x**6-208*x**5+1352*x**4-8*x**3+122*x**2-156*x+2)/(4*x**6-104*x**5+676*x**4-4*x**3+52*x**2+1),x)

[Out]

2*x - 3/(2*x**3 - 26*x**2 - 1)

Maxima [A] (verification not implemented)

none

Time = 0.19 (sec) , antiderivative size = 20, normalized size of antiderivative = 0.83 \[ \int \frac {2-156 x+122 x^2-8 x^3+1352 x^4-208 x^5+8 x^6}{1+52 x^2-4 x^3+676 x^4-104 x^5+4 x^6} \, dx=2 \, x - \frac {3}{2 \, x^{3} - 26 \, x^{2} - 1} \]

[In]

integrate((8*x^6-208*x^5+1352*x^4-8*x^3+122*x^2-156*x+2)/(4*x^6-104*x^5+676*x^4-4*x^3+52*x^2+1),x, algorithm="
maxima")

[Out]

2*x - 3/(2*x^3 - 26*x^2 - 1)

Giac [A] (verification not implemented)

none

Time = 0.27 (sec) , antiderivative size = 20, normalized size of antiderivative = 0.83 \[ \int \frac {2-156 x+122 x^2-8 x^3+1352 x^4-208 x^5+8 x^6}{1+52 x^2-4 x^3+676 x^4-104 x^5+4 x^6} \, dx=2 \, x - \frac {3}{2 \, x^{3} - 26 \, x^{2} - 1} \]

[In]

integrate((8*x^6-208*x^5+1352*x^4-8*x^3+122*x^2-156*x+2)/(4*x^6-104*x^5+676*x^4-4*x^3+52*x^2+1),x, algorithm="
giac")

[Out]

2*x - 3/(2*x^3 - 26*x^2 - 1)

Mupad [B] (verification not implemented)

Time = 12.32 (sec) , antiderivative size = 20, normalized size of antiderivative = 0.83 \[ \int \frac {2-156 x+122 x^2-8 x^3+1352 x^4-208 x^5+8 x^6}{1+52 x^2-4 x^3+676 x^4-104 x^5+4 x^6} \, dx=2\,x+\frac {3}{2\,\left (-x^3+13\,x^2+\frac {1}{2}\right )} \]

[In]

int((122*x^2 - 156*x - 8*x^3 + 1352*x^4 - 208*x^5 + 8*x^6 + 2)/(52*x^2 - 4*x^3 + 676*x^4 - 104*x^5 + 4*x^6 + 1
),x)

[Out]

2*x + 3/(2*(13*x^2 - x^3 + 1/2))