3.252 \(\int \frac{x \left (5+x+3 x^2+2 x^3\right )}{2+x+5 x^2+x^3+2 x^4} \, dx\)

Optimal. Leaf size=230 \[ \frac{1}{28} \left (7+5 i \sqrt{7}\right ) \log \left (4 x^2+\left (1-i \sqrt{7}\right ) x+4\right )+\frac{1}{28} \left (7-5 i \sqrt{7}\right ) \log \left (4 x^2+\left (1+i \sqrt{7}\right ) x+4\right )+\frac{1}{14} \left (7+5 i \sqrt{7}\right ) x+\frac{1}{14} \left (7-5 i \sqrt{7}\right ) x-\frac{\left (7 \sqrt{7}+19 i\right ) \tan ^{-1}\left (\frac{8 x-i \sqrt{7}+1}{\sqrt{2 \left (35+i \sqrt{7}\right )}}\right )}{\sqrt{14 \left (35+i \sqrt{7}\right )}}+\frac{\left (-7 \sqrt{7}+19 i\right ) \tan ^{-1}\left (\frac{8 x+i \sqrt{7}+1}{\sqrt{2 \left (35-i \sqrt{7}\right )}}\right )}{\sqrt{14 \left (35-i \sqrt{7}\right )}} \]

[Out]

((7 - (5*I)*Sqrt[7])*x)/14 + ((7 + (5*I)*Sqrt[7])*x)/14 - ((19*I + 7*Sqrt[7])*Ar
cTan[(1 - I*Sqrt[7] + 8*x)/Sqrt[2*(35 + I*Sqrt[7])]])/Sqrt[14*(35 + I*Sqrt[7])]
+ ((19*I - 7*Sqrt[7])*ArcTan[(1 + I*Sqrt[7] + 8*x)/Sqrt[2*(35 - I*Sqrt[7])]])/Sq
rt[14*(35 - I*Sqrt[7])] + ((7 + (5*I)*Sqrt[7])*Log[4 + (1 - I*Sqrt[7])*x + 4*x^2
])/28 + ((7 - (5*I)*Sqrt[7])*Log[4 + (1 + I*Sqrt[7])*x + 4*x^2])/28

_______________________________________________________________________________________

Rubi [A]  time = 0.950496, antiderivative size = 230, normalized size of antiderivative = 1., number of steps used = 11, number of rules used = 6, integrand size = 33, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.182 \[ \frac{1}{28} \left (7+5 i \sqrt{7}\right ) \log \left (4 x^2+\left (1-i \sqrt{7}\right ) x+4\right )+\frac{1}{28} \left (7-5 i \sqrt{7}\right ) \log \left (4 x^2+\left (1+i \sqrt{7}\right ) x+4\right )+\frac{1}{14} \left (7+5 i \sqrt{7}\right ) x+\frac{1}{14} \left (7-5 i \sqrt{7}\right ) x-\frac{\left (7 \sqrt{7}+19 i\right ) \tan ^{-1}\left (\frac{8 x-i \sqrt{7}+1}{\sqrt{2 \left (35+i \sqrt{7}\right )}}\right )}{\sqrt{14 \left (35+i \sqrt{7}\right )}}+\frac{\left (-7 \sqrt{7}+19 i\right ) \tan ^{-1}\left (\frac{8 x+i \sqrt{7}+1}{\sqrt{2 \left (35-i \sqrt{7}\right )}}\right )}{\sqrt{14 \left (35-i \sqrt{7}\right )}} \]

Antiderivative was successfully verified.

[In]  Int[(x*(5 + x + 3*x^2 + 2*x^3))/(2 + x + 5*x^2 + x^3 + 2*x^4),x]

[Out]

((7 - (5*I)*Sqrt[7])*x)/14 + ((7 + (5*I)*Sqrt[7])*x)/14 - ((19*I + 7*Sqrt[7])*Ar
cTan[(1 - I*Sqrt[7] + 8*x)/Sqrt[2*(35 + I*Sqrt[7])]])/Sqrt[14*(35 + I*Sqrt[7])]
+ ((19*I - 7*Sqrt[7])*ArcTan[(1 + I*Sqrt[7] + 8*x)/Sqrt[2*(35 - I*Sqrt[7])]])/Sq
rt[14*(35 - I*Sqrt[7])] + ((7 + (5*I)*Sqrt[7])*Log[4 + (1 - I*Sqrt[7])*x + 4*x^2
])/28 + ((7 - (5*I)*Sqrt[7])*Log[4 + (1 + I*Sqrt[7])*x + 4*x^2])/28

_______________________________________________________________________________________

Rubi in Sympy [F]  time = 0., size = 0, normalized size = 0. \[ \left (\frac{1}{4} + \frac{5 \sqrt{7} i}{28}\right ) \log{\left (4 x^{2} + x \left (1 - \sqrt{7} i\right ) + 4 \right )} + \left (\frac{1}{4} - \frac{5 \sqrt{7} i}{28}\right ) \log{\left (4 x^{2} + x \left (1 + \sqrt{7} i\right ) + 4 \right )} + \frac{\left (7 - \frac{19 \sqrt{7} i}{7}\right ) \operatorname{atan}{\left (\frac{8 x + 1 + \sqrt{7} i}{\sqrt{35 + 4 \sqrt{77}} - i \sqrt{-35 + 4 \sqrt{77}}} \right )}}{- \sqrt{35 + 4 \sqrt{77}} + i \sqrt{-35 + 4 \sqrt{77}}} - \frac{\left (7 + \frac{19 \sqrt{7} i}{7}\right ) \operatorname{atan}{\left (\frac{8 x + 1 - \sqrt{7} i}{\sqrt{35 + 4 \sqrt{77}} + i \sqrt{-35 + 4 \sqrt{77}}} \right )}}{\sqrt{35 + 4 \sqrt{77}} + i \sqrt{-35 + 4 \sqrt{77}}} - \int \left (- \frac{1}{2}\right )\, dx + \int \frac{1}{2}\, dx \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  rubi_integrate(x*(2*x**3+3*x**2+x+5)/(2*x**4+x**3+5*x**2+x+2),x)

[Out]

(1/4 + 5*sqrt(7)*I/28)*log(4*x**2 + x*(1 - sqrt(7)*I) + 4) + (1/4 - 5*sqrt(7)*I/
28)*log(4*x**2 + x*(1 + sqrt(7)*I) + 4) + (7 - 19*sqrt(7)*I/7)*atan((8*x + 1 + s
qrt(7)*I)/(sqrt(35 + 4*sqrt(77)) - I*sqrt(-35 + 4*sqrt(77))))/(-sqrt(35 + 4*sqrt
(77)) + I*sqrt(-35 + 4*sqrt(77))) - (7 + 19*sqrt(7)*I/7)*atan((8*x + 1 - sqrt(7)
*I)/(sqrt(35 + 4*sqrt(77)) + I*sqrt(-35 + 4*sqrt(77))))/(sqrt(35 + 4*sqrt(77)) +
I*sqrt(-35 + 4*sqrt(77))) - Integral(-1/2, x) + Integral(1/2, x)

_______________________________________________________________________________________

Mathematica [C]  time = 0.0249216, size = 94, normalized size = 0.41 \[ 2 \text{RootSum}\left [2 \text{$\#$1}^4+\text{$\#$1}^3+5 \text{$\#$1}^2+\text{$\#$1}+2\&,\frac{\text{$\#$1}^3 \log (x-\text{$\#$1})-2 \text{$\#$1}^2 \log (x-\text{$\#$1})+2 \text{$\#$1} \log (x-\text{$\#$1})-\log (x-\text{$\#$1})}{8 \text{$\#$1}^3+3 \text{$\#$1}^2+10 \text{$\#$1}+1}\&\right ]+x \]

Antiderivative was successfully verified.

[In]  Integrate[(x*(5 + x + 3*x^2 + 2*x^3))/(2 + x + 5*x^2 + x^3 + 2*x^4),x]

[Out]

x + 2*RootSum[2 + #1 + 5*#1^2 + #1^3 + 2*#1^4 & , (-Log[x - #1] + 2*Log[x - #1]*
#1 - 2*Log[x - #1]*#1^2 + Log[x - #1]*#1^3)/(1 + 10*#1 + 3*#1^2 + 8*#1^3) & ]

_______________________________________________________________________________________

Maple [C]  time = 0.009, size = 62, normalized size = 0.3 \[ x+2\,\sum _{{\it \_R}={\it RootOf} \left ( 2\,{{\it \_Z}}^{4}+{{\it \_Z}}^{3}+5\,{{\it \_Z}}^{2}+{\it \_Z}+2 \right ) }{\frac{ \left ({{\it \_R}}^{3}-2\,{{\it \_R}}^{2}+2\,{\it \_R}-1 \right ) \ln \left ( x-{\it \_R} \right ) }{8\,{{\it \_R}}^{3}+3\,{{\it \_R}}^{2}+10\,{\it \_R}+1}} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  int(x*(2*x^3+3*x^2+x+5)/(2*x^4+x^3+5*x^2+x+2),x)

[Out]

x+2*sum((_R^3-2*_R^2+2*_R-1)/(8*_R^3+3*_R^2+10*_R+1)*ln(x-_R),_R=RootOf(2*_Z^4+_
Z^3+5*_Z^2+_Z+2))

_______________________________________________________________________________________

Maxima [F]  time = 0., size = 0, normalized size = 0. \[ x + 2 \, \int \frac{x^{3} - 2 \, x^{2} + 2 \, x - 1}{2 \, x^{4} + x^{3} + 5 \, x^{2} + x + 2}\,{d x} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((2*x^3 + 3*x^2 + x + 5)*x/(2*x^4 + x^3 + 5*x^2 + x + 2),x, algorithm="maxima")

[Out]

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

_______________________________________________________________________________________

Fricas [F(-2)]  time = 0., size = 0, normalized size = 0. \[ \text{Exception raised: NotImplementedError} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((2*x^3 + 3*x^2 + x + 5)*x/(2*x^4 + x^3 + 5*x^2 + x + 2),x, algorithm="fricas")

[Out]

Exception raised: NotImplementedError

_______________________________________________________________________________________

Sympy [A]  time = 2.83781, size = 48, normalized size = 0.21 \[ x + \operatorname{RootSum}{\left (343 t^{4} - 343 t^{3} + 294 t^{2} - 336 t + 128, \left ( t \mapsto t \log{\left (\frac{3773 t^{3}}{304} - \frac{1029 t^{2}}{304} + \frac{1001 t}{152} + x - \frac{121}{19} \right )} \right )\right )} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate(x*(2*x**3+3*x**2+x+5)/(2*x**4+x**3+5*x**2+x+2),x)

[Out]

x + RootSum(343*_t**4 - 343*_t**3 + 294*_t**2 - 336*_t + 128, Lambda(_t, _t*log(
3773*_t**3/304 - 1029*_t**2/304 + 1001*_t/152 + x - 121/19)))

_______________________________________________________________________________________

GIAC/XCAS [F]  time = 0., size = 0, normalized size = 0. \[ \int \frac{{\left (2 \, x^{3} + 3 \, x^{2} + x + 5\right )} x}{2 \, x^{4} + x^{3} + 5 \, x^{2} + x + 2}\,{d x} \]

Verification of antiderivative is not currently implemented for this CAS.

[In]  integrate((2*x^3 + 3*x^2 + x + 5)*x/(2*x^4 + x^3 + 5*x^2 + x + 2),x, algorithm="giac")

[Out]

integrate((2*x^3 + 3*x^2 + x + 5)*x/(2*x^4 + x^3 + 5*x^2 + x + 2), x)