3.3.55 \(\int \frac {5+x+3 x^2+2 x^3}{x^2 (2+x+5 x^2+x^3+2 x^4)} \, dx\) [255]
Optimal. Leaf size=281 \[ -\frac {35-9 i \sqrt {7}}{28 x}-\frac {35+9 i \sqrt {7}}{28 x}+\frac {11 \left (9+5 i \sqrt {7}\right ) \tanh ^{-1}\left (\frac {i-\sqrt {7}+8 i x}{\sqrt {2 \left (35-i \sqrt {7}\right )}}\right )}{4 \sqrt {14 \left (35-i \sqrt {7}\right )}}-\frac {11 \left (9-5 i \sqrt {7}\right ) \tanh ^{-1}\left (\frac {i+\sqrt {7}+8 i x}{\sqrt {2 \left (35+i \sqrt {7}\right )}}\right )}{4 \sqrt {14 \left (35+i \sqrt {7}\right )}}-\frac {3}{56} \left (7-11 i \sqrt {7}\right ) \log (x)-\frac {3}{56} \left (7+11 i \sqrt {7}\right ) \log (x)+\frac {3}{112} \left (7+11 i \sqrt {7}\right ) \log \left (4 i+\left (i-\sqrt {7}\right ) x+4 i x^2\right )+\frac {3}{112} \left (7-11 i \sqrt {7}\right ) \log \left (4 i+\left (i+\sqrt {7}\right ) x+4 i x^2\right ) \]
[Out]
1/28*(-35+9*I*7^(1/2))/x+1/28*(-35-9*I*7^(1/2))/x-3/56*ln(x)*(7-11*I*7^(1/2))+3/112*ln(4*I+4*I*x^2+x*(I+7^(1/2
)))*(7-11*I*7^(1/2))-3/56*ln(x)*(7+11*I*7^(1/2))+3/112*ln(4*I+4*I*x^2+x*(I-7^(1/2)))*(7+11*I*7^(1/2))+11/4*arc
tanh((I+8*I*x-7^(1/2))/(70-2*I*7^(1/2))^(1/2))*(9+5*I*7^(1/2))/(490-14*I*7^(1/2))^(1/2)-11/4*arctanh((I+8*I*x+
7^(1/2))/(70+2*I*7^(1/2))^(1/2))*(9-5*I*7^(1/2))/(490+14*I*7^(1/2))^(1/2)
________________________________________________________________________________________
Rubi [A]
time = 0.34, antiderivative size = 281, normalized size of antiderivative = 1.00, number of steps
used = 13, number of rules used = 6, integrand size = 35, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.171, Rules used = {2112, 814,
648, 632, 212, 642} \begin {gather*} \frac {3}{112} \left (7+11 i \sqrt {7}\right ) \log \left (4 i x^2+\left (-\sqrt {7}+i\right ) x+4 i\right )+\frac {3}{112} \left (7-11 i \sqrt {7}\right ) \log \left (4 i x^2+\left (\sqrt {7}+i\right ) x+4 i\right )-\frac {35+9 i \sqrt {7}}{28 x}-\frac {35-9 i \sqrt {7}}{28 x}-\frac {3}{56} \left (7+11 i \sqrt {7}\right ) \log (x)-\frac {3}{56} \left (7-11 i \sqrt {7}\right ) \log (x)+\frac {11 \left (9+5 i \sqrt {7}\right ) \tanh ^{-1}\left (\frac {8 i x-\sqrt {7}+i}{\sqrt {2 \left (35-i \sqrt {7}\right )}}\right )}{4 \sqrt {14 \left (35-i \sqrt {7}\right )}}-\frac {11 \left (9-5 i \sqrt {7}\right ) \tanh ^{-1}\left (\frac {8 i x+\sqrt {7}+i}{\sqrt {2 \left (35+i \sqrt {7}\right )}}\right )}{4 \sqrt {14 \left (35+i \sqrt {7}\right )}} \end {gather*}
Antiderivative was successfully verified.
[In]
Int[(5 + x + 3*x^2 + 2*x^3)/(x^2*(2 + x + 5*x^2 + x^3 + 2*x^4)),x]
[Out]
-1/28*(35 - (9*I)*Sqrt[7])/x - (35 + (9*I)*Sqrt[7])/(28*x) + (11*(9 + (5*I)*Sqrt[7])*ArcTanh[(I - Sqrt[7] + (8
*I)*x)/Sqrt[2*(35 - I*Sqrt[7])]])/(4*Sqrt[14*(35 - I*Sqrt[7])]) - (11*(9 - (5*I)*Sqrt[7])*ArcTanh[(I + Sqrt[7]
+ (8*I)*x)/Sqrt[2*(35 + I*Sqrt[7])]])/(4*Sqrt[14*(35 + I*Sqrt[7])]) - (3*(7 - (11*I)*Sqrt[7])*Log[x])/56 - (3
*(7 + (11*I)*Sqrt[7])*Log[x])/56 + (3*(7 + (11*I)*Sqrt[7])*Log[4*I + (I - Sqrt[7])*x + (4*I)*x^2])/112 + (3*(7
- (11*I)*Sqrt[7])*Log[4*I + (I + Sqrt[7])*x + (4*I)*x^2])/112
Rule 212
Int[((a_) + (b_.)*(x_)^2)^(-1), x_Symbol] :> Simp[(1/(Rt[a, 2]*Rt[-b, 2]))*ArcTanh[Rt[-b, 2]*(x/Rt[a, 2])], x]
/; FreeQ[{a, b}, x] && NegQ[a/b] && (GtQ[a, 0] || LtQ[b, 0])
Rule 632
Int[((a_.) + (b_.)*(x_) + (c_.)*(x_)^2)^(-1), x_Symbol] :> Dist[-2, Subst[Int[1/Simp[b^2 - 4*a*c - x^2, x], x]
, x, b + 2*c*x], x] /; FreeQ[{a, b, c}, x] && NeQ[b^2 - 4*a*c, 0]
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 648
Int[((d_.) + (e_.)*(x_))/((a_) + (b_.)*(x_) + (c_.)*(x_)^2), x_Symbol] :> Dist[(2*c*d - b*e)/(2*c), Int[1/(a +
b*x + c*x^2), x], x] + Dist[e/(2*c), Int[(b + 2*c*x)/(a + b*x + c*x^2), x], x] /; FreeQ[{a, b, c, d, e}, x] &
& NeQ[2*c*d - b*e, 0] && NeQ[b^2 - 4*a*c, 0] && !NiceSqrtQ[b^2 - 4*a*c]
Rule 814
Int[(((d_.) + (e_.)*(x_))^(m_)*((f_.) + (g_.)*(x_)))/((a_.) + (b_.)*(x_) + (c_.)*(x_)^2), x_Symbol] :> Int[Exp
andIntegrand[(d + e*x)^m*((f + g*x)/(a + b*x + c*x^2)), x], x] /; FreeQ[{a, b, c, d, e, f, g}, x] && NeQ[b^2 -
4*a*c, 0] && NeQ[c*d^2 - b*d*e + a*e^2, 0] && IntegerQ[m]
Rule 2112
Int[((P3_)*(x_)^(m_.))/((a_) + (b_.)*(x_) + (c_.)*(x_)^2 + (d_.)*(x_)^3 + (e_.)*(x_)^4), x_Symbol] :> With[{q
= Sqrt[8*a^2 + b^2 - 4*a*c], A = Coeff[P3, x, 0], B = Coeff[P3, x, 1], C = Coeff[P3, x, 2], D = Coeff[P3, x, 3
]}, Dist[1/q, Int[x^m*((b*A - 2*a*B + 2*a*D + A*q + (2*a*A - 2*a*C + b*D + D*q)*x)/(2*a + (b + q)*x + 2*a*x^2)
), x], x] - Dist[1/q, Int[x^m*((b*A - 2*a*B + 2*a*D - A*q + (2*a*A - 2*a*C + b*D - D*q)*x)/(2*a + (b - q)*x +
2*a*x^2)), x], x]] /; FreeQ[{a, b, c, m}, x] && PolyQ[P3, x, 3] && EqQ[a, e] && EqQ[b, d]
Rubi steps
\begin {align*} \int \frac {5+x+3 x^2+2 x^3}{x^2 \left (2+x+5 x^2+x^3+2 x^4\right )} \, dx &=\frac {i \int \frac {9-5 i \sqrt {7}+\left (10-2 i \sqrt {7}\right ) x}{x^2 \left (4+\left (1-i \sqrt {7}\right ) x+4 x^2\right )} \, dx}{\sqrt {7}}-\frac {i \int \frac {9+5 i \sqrt {7}+\left (10+2 i \sqrt {7}\right ) x}{x^2 \left (4+\left (1+i \sqrt {7}\right ) x+4 x^2\right )} \, dx}{\sqrt {7}}\\ &=-\frac {i \int \left (\frac {9+5 i \sqrt {7}}{4 x^2}+\frac {3 \left (11-i \sqrt {7}\right )}{8 x}+\frac {-7 \left (9 i-5 \sqrt {7}\right )-6 \left (11 i+\sqrt {7}\right ) x}{4 \left (4 i+\left (i-\sqrt {7}\right ) x+4 i x^2\right )}\right ) \, dx}{\sqrt {7}}+\frac {i \int \left (\frac {9-5 i \sqrt {7}}{4 x^2}+\frac {3 \left (11+i \sqrt {7}\right )}{8 x}+\frac {-7 \left (9 i+5 \sqrt {7}\right )-6 \left (11 i-\sqrt {7}\right ) x}{4 \left (4 i+\left (i+\sqrt {7}\right ) x+4 i x^2\right )}\right ) \, dx}{\sqrt {7}}\\ &=-\frac {35-9 i \sqrt {7}}{28 x}-\frac {35+9 i \sqrt {7}}{28 x}-\frac {3}{56} \left (7-11 i \sqrt {7}\right ) \log (x)-\frac {3}{56} \left (7+11 i \sqrt {7}\right ) \log (x)-\frac {i \int \frac {-7 \left (9 i-5 \sqrt {7}\right )-6 \left (11 i+\sqrt {7}\right ) x}{4 i+\left (i-\sqrt {7}\right ) x+4 i x^2} \, dx}{4 \sqrt {7}}+\frac {i \int \frac {-7 \left (9 i+5 \sqrt {7}\right )-6 \left (11 i-\sqrt {7}\right ) x}{4 i+\left (i+\sqrt {7}\right ) x+4 i x^2} \, dx}{4 \sqrt {7}}\\ &=-\frac {35-9 i \sqrt {7}}{28 x}-\frac {35+9 i \sqrt {7}}{28 x}-\frac {3}{56} \left (7-11 i \sqrt {7}\right ) \log (x)-\frac {3}{56} \left (7+11 i \sqrt {7}\right ) \log (x)-\frac {1}{56} \left (11 \left (35 i-9 \sqrt {7}\right )\right ) \int \frac {1}{4 i+\left (i+\sqrt {7}\right ) x+4 i x^2} \, dx+\frac {1}{112} \left (3 \left (7-11 i \sqrt {7}\right )\right ) \int \frac {i+\sqrt {7}+8 i x}{4 i+\left (i+\sqrt {7}\right ) x+4 i x^2} \, dx+\frac {1}{112} \left (3 \left (7+11 i \sqrt {7}\right )\right ) \int \frac {i-\sqrt {7}+8 i x}{4 i+\left (i-\sqrt {7}\right ) x+4 i x^2} \, dx-\frac {1}{56} \left (11 \left (35 i+9 \sqrt {7}\right )\right ) \int \frac {1}{4 i+\left (i-\sqrt {7}\right ) x+4 i x^2} \, dx\\ &=-\frac {35-9 i \sqrt {7}}{28 x}-\frac {35+9 i \sqrt {7}}{28 x}-\frac {3}{56} \left (7-11 i \sqrt {7}\right ) \log (x)-\frac {3}{56} \left (7+11 i \sqrt {7}\right ) \log (x)+\frac {3}{112} \left (7+11 i \sqrt {7}\right ) \log \left (4 i+\left (i-\sqrt {7}\right ) x+4 i x^2\right )+\frac {3}{112} \left (7-11 i \sqrt {7}\right ) \log \left (4 i+\left (i+\sqrt {7}\right ) x+4 i x^2\right )+\frac {1}{28} \left (11 \left (35 i-9 \sqrt {7}\right )\right ) \text {Subst}\left (\int \frac {1}{2 \left (35+i \sqrt {7}\right )-x^2} \, dx,x,i+\sqrt {7}+8 i x\right )+\frac {1}{28} \left (11 \left (35 i+9 \sqrt {7}\right )\right ) \text {Subst}\left (\int \frac {1}{2 \left (35-i \sqrt {7}\right )-x^2} \, dx,x,i-\sqrt {7}+8 i x\right )\\ &=-\frac {35-9 i \sqrt {7}}{28 x}-\frac {35+9 i \sqrt {7}}{28 x}+\frac {11 \left (9+5 i \sqrt {7}\right ) \tanh ^{-1}\left (\frac {i-\sqrt {7}+8 i x}{\sqrt {2 \left (35-i \sqrt {7}\right )}}\right )}{4 \sqrt {14 \left (35-i \sqrt {7}\right )}}-\frac {11 \left (9-5 i \sqrt {7}\right ) \tanh ^{-1}\left (\frac {i+\sqrt {7}+8 i x}{\sqrt {2 \left (35+i \sqrt {7}\right )}}\right )}{4 \sqrt {14 \left (35+i \sqrt {7}\right )}}-\frac {3}{56} \left (7-11 i \sqrt {7}\right ) \log (x)-\frac {3}{56} \left (7+11 i \sqrt {7}\right ) \log (x)+\frac {3}{112} \left (7+11 i \sqrt {7}\right ) \log \left (4 i+\left (i-\sqrt {7}\right ) x+4 i x^2\right )+\frac {3}{112} \left (7-11 i \sqrt {7}\right ) \log \left (4 i+\left (i+\sqrt {7}\right ) x+4 i x^2\right )\\ \end {align*}
________________________________________________________________________________________
Mathematica [C] Result contains higher order function than in optimal. Order 9 vs. order 3 in
optimal.
time = 0.01, size = 109, normalized size = 0.39 \begin {gather*} -\frac {5}{2 x}-\frac {3 \log (x)}{4}+\frac {1}{4} \text {RootSum}\left [2+\text {$\#$1}+5 \text {$\#$1}^2+\text {$\#$1}^3+2 \text {$\#$1}^4\&,\frac {-35 \log (x-\text {$\#$1})+13 \log (x-\text {$\#$1}) \text {$\#$1}-17 \log (x-\text {$\#$1}) \text {$\#$1}^2+6 \log (x-\text {$\#$1}) \text {$\#$1}^3}{1+10 \text {$\#$1}+3 \text {$\#$1}^2+8 \text {$\#$1}^3}\&\right ] \end {gather*}
Antiderivative was successfully verified.
[In]
Integrate[(5 + x + 3*x^2 + 2*x^3)/(x^2*(2 + x + 5*x^2 + x^3 + 2*x^4)),x]
[Out]
-5/(2*x) - (3*Log[x])/4 + RootSum[2 + #1 + 5*#1^2 + #1^3 + 2*#1^4 & , (-35*Log[x - #1] + 13*Log[x - #1]*#1 - 1
7*Log[x - #1]*#1^2 + 6*Log[x - #1]*#1^3)/(1 + 10*#1 + 3*#1^2 + 8*#1^3) & ]/4
________________________________________________________________________________________
Maple [C] Result contains higher order function than in optimal. Order 9 vs. order
3.
time = 0.03, size = 72, normalized size = 0.26
| | |
method |
result |
size |
| | |
risch |
\(-\frac {5}{2 x}-\frac {3 \ln \left (x \right )}{4}+\frac {\left (\munderset {\textit {\_R} =\RootOf \left (686 \textit {\_Z}^{4}-1029 \textit {\_Z}^{3}+6272 \textit {\_Z}^{2}+10752 \textit {\_Z} +4096\right )}{\sum }\textit {\_R} \ln \left (-45962 \textit {\_R}^{3}+98735 \textit {\_R}^{2}-497168 \textit {\_R} +61952 x -384256\right )\right )}{2}\) |
\(58\) |
default |
\(\frac {\left (\munderset {\textit {\_R} =\RootOf \left (2 \textit {\_Z}^{4}+\textit {\_Z}^{3}+5 \textit {\_Z}^{2}+\textit {\_Z} +2\right )}{\sum }\frac {\left (6 \textit {\_R}^{3}-17 \textit {\_R}^{2}+13 \textit {\_R} -35\right ) \ln \left (x -\textit {\_R} \right )}{8 \textit {\_R}^{3}+3 \textit {\_R}^{2}+10 \textit {\_R} +1}\right )}{4}-\frac {5}{2 x}-\frac {3 \ln \left (x \right )}{4}\) |
\(72\) |
| | |
|
|
|
Verification of antiderivative is not currently implemented for this CAS.
[In]
int((2*x^3+3*x^2+x+5)/x^2/(2*x^4+x^3+5*x^2+x+2),x,method=_RETURNVERBOSE)
[Out]
1/4*sum((6*_R^3-17*_R^2+13*_R-35)/(8*_R^3+3*_R^2+10*_R+1)*ln(x-_R),_R=RootOf(2*_Z^4+_Z^3+5*_Z^2+_Z+2))-5/2/x-3
/4*ln(x)
________________________________________________________________________________________
Maxima [F]
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \text {Failed to integrate} \end {gather*}
Verification of antiderivative is not currently implemented for this CAS.
[In]
integrate((2*x^3+3*x^2+x+5)/x^2/(2*x^4+x^3+5*x^2+x+2),x, algorithm="maxima")
[Out]
-5/2/x + 1/4*integrate((6*x^3 - 17*x^2 + 13*x - 35)/(2*x^4 + x^3 + 5*x^2 + x + 2), x) - 3/4*log(x)
________________________________________________________________________________________
Fricas [B] Both result and optimal contain complex but leaf count of result is larger than twice
the leaf count of optimal. 1245 vs. \(2 (172) = 344\).
time = 1.19, size = 1245, normalized size = 4.43 \begin {gather*} \text {Too large to display} \end {gather*}
Verification of antiderivative is not currently implemented for this CAS.
[In]
integrate((2*x^3+3*x^2+x+5)/x^2/(2*x^4+x^3+5*x^2+x+2),x, algorithm="fricas")
[Out]
-1/224*(2*x*(33*I*sqrt(7) + 56*sqrt(-2101/1568*I*sqrt(7) - 55/32) - 21)*log(91924*(33/112*I*sqrt(7) - 1/2*sqrt
(2101/1568*I*sqrt(7) - 55/32) + 3/16)^3 - 49/4*(-33/112*I*sqrt(7) - 1/2*sqrt(-2101/1568*I*sqrt(7) - 55/32) + 3
/16)^2*(-2211*I*sqrt(7) + 3752*sqrt(2101/1568*I*sqrt(7) - 55/32) - 3839) - 1/256*(210112*(33/112*I*sqrt(7) - 1
/2*sqrt(2101/1568*I*sqrt(7) - 55/32) + 3/16)^2 - 46431*I*sqrt(7) + 78792*sqrt(2101/1568*I*sqrt(7) - 55/32) - 1
17483)*(33*I*sqrt(7) + 56*sqrt(-2101/1568*I*sqrt(7) - 55/32) - 21) - 68943*(33/112*I*sqrt(7) - 1/2*sqrt(2101/1
568*I*sqrt(7) - 55/32) + 3/16)^2 + 15488*x + 61908*I*sqrt(7) - 105056*sqrt(2101/1568*I*sqrt(7) - 55/32) + 1234
28) + 2*x*(-33*I*sqrt(7) + 56*sqrt(2101/1568*I*sqrt(7) - 55/32) - 21)*log(-91924*(33/112*I*sqrt(7) - 1/2*sqrt(
2101/1568*I*sqrt(7) - 55/32) + 3/16)^3 + 98735*(33/112*I*sqrt(7) - 1/2*sqrt(2101/1568*I*sqrt(7) - 55/32) + 3/1
6)^2 + 15488*x - 146487/2*I*sqrt(7) + 124292*sqrt(2101/1568*I*sqrt(7) - 55/32) - 285347/2) + (4*sqrt(7)*sqrt(-
336*(33/112*I*sqrt(7) - 1/2*sqrt(2101/1568*I*sqrt(7) - 55/32) + 3/16)^2 - 336*(-33/112*I*sqrt(7) - 1/2*sqrt(-2
101/1568*I*sqrt(7) - 55/32) + 3/16)^2 - 1/56*(33*I*sqrt(7) + 56*sqrt(-2101/1568*I*sqrt(7) - 55/32) - 21)*(-33*
I*sqrt(7) + 56*sqrt(2101/1568*I*sqrt(7) - 55/32) + 63) + 99/2*I*sqrt(7) - 84*sqrt(2101/1568*I*sqrt(7) - 55/32)
- 1859/2)*x - x*(33*I*sqrt(7) + 56*sqrt(-2101/1568*I*sqrt(7) - 55/32) - 21) - x*(-33*I*sqrt(7) + 56*sqrt(2101
/1568*I*sqrt(7) - 55/32) - 21) - 84*x)*log(49/4*(-33/112*I*sqrt(7) - 1/2*sqrt(-2101/1568*I*sqrt(7) - 55/32) +
3/16)^2*(-2211*I*sqrt(7) + 3752*sqrt(2101/1568*I*sqrt(7) - 55/32) - 3839) + 1/256*(210112*(33/112*I*sqrt(7) -
1/2*sqrt(2101/1568*I*sqrt(7) - 55/32) + 3/16)^2 - 46431*I*sqrt(7) + 78792*sqrt(2101/1568*I*sqrt(7) - 55/32) -
117483)*(33*I*sqrt(7) + 56*sqrt(-2101/1568*I*sqrt(7) - 55/32) - 21) - 29792*(33/112*I*sqrt(7) - 1/2*sqrt(2101/
1568*I*sqrt(7) - 55/32) + 3/16)^2 + 1/256*((67*sqrt(7)*(-33*I*sqrt(7) + 56*sqrt(2101/1568*I*sqrt(7) - 55/32) -
21) - 2432*sqrt(7))*(33*I*sqrt(7) + 56*sqrt(-2101/1568*I*sqrt(7) - 55/32) - 21) - 2432*sqrt(7)*(-33*I*sqrt(7)
+ 56*sqrt(2101/1568*I*sqrt(7) - 55/32) - 21) + 147456*sqrt(7))*sqrt(-336*(33/112*I*sqrt(7) - 1/2*sqrt(2101/15
68*I*sqrt(7) - 55/32) + 3/16)^2 - 336*(-33/112*I*sqrt(7) - 1/2*sqrt(-2101/1568*I*sqrt(7) - 55/32) + 3/16)^2 -
1/56*(33*I*sqrt(7) + 56*sqrt(-2101/1568*I*sqrt(7) - 55/32) - 21)*(-33*I*sqrt(7) + 56*sqrt(2101/1568*I*sqrt(7)
- 55/32) + 63) + 99/2*I*sqrt(7) - 84*sqrt(2101/1568*I*sqrt(7) - 55/32) - 1859/2) + 30976*x + 22671/2*I*sqrt(7)
- 19236*sqrt(2101/1568*I*sqrt(7) - 55/32) + 53979/2) - (4*sqrt(7)*sqrt(-336*(33/112*I*sqrt(7) - 1/2*sqrt(2101
/1568*I*sqrt(7) - 55/32) + 3/16)^2 - 336*(-33/112*I*sqrt(7) - 1/2*sqrt(-2101/1568*I*sqrt(7) - 55/32) + 3/16)^2
- 1/56*(33*I*sqrt(7) + 56*sqrt(-2101/1568*I*sqrt(7) - 55/32) - 21)*(-33*I*sqrt(7) + 56*sqrt(2101/1568*I*sqrt(
7) - 55/32) + 63) + 99/2*I*sqrt(7) - 84*sqrt(2101/1568*I*sqrt(7) - 55/32) - 1859/2)*x + x*(33*I*sqrt(7) + 56*s
qrt(-2101/1568*I*sqrt(7) - 55/32) - 21) + x*(-33*I*sqrt(7) + 56*sqrt(2101/1568*I*sqrt(7) - 55/32) - 21) + 84*x
)*log(49/4*(-33/112*I*sqrt(7) - 1/2*sqrt(-2101/1568*I*sqrt(7) - 55/32) + 3/16)^2*(-2211*I*sqrt(7) + 3752*sqrt(
2101/1568*I*sqrt(7) - 55/32) - 3839) + 1/256*(210112*(33/112*I*sqrt(7) - 1/2*sqrt(2101/1568*I*sqrt(7) - 55/32)
+ 3/16)^2 - 46431*I*sqrt(7) + 78792*sqrt(2101/1568*I*sqrt(7) - 55/32) - 117483)*(33*I*sqrt(7) + 56*sqrt(-2101
/1568*I*sqrt(7) - 55/32) - 21) - 29792*(33/112*I*sqrt(7) - 1/2*sqrt(2101/1568*I*sqrt(7) - 55/32) + 3/16)^2 - 1
/256*((67*sqrt(7)*(-33*I*sqrt(7) + 56*sqrt(2101/1568*I*sqrt(7) - 55/32) - 21) - 2432*sqrt(7))*(33*I*sqrt(7) +
56*sqrt(-2101/1568*I*sqrt(7) - 55/32) - 21) - 2432*sqrt(7)*(-33*I*sqrt(7) + 56*sqrt(2101/1568*I*sqrt(7) - 55/3
2) - 21) + 147456*sqrt(7))*sqrt(-336*(33/112*I*sqrt(7) - 1/2*sqrt(2101/1568*I*sqrt(7) - 55/32) + 3/16)^2 - 336
*(-33/112*I*sqrt(7) - 1/2*sqrt(-2101/1568*I*sqrt(7) - 55/32) + 3/16)^2 - 1/56*(33*I*sqrt(7) + 56*sqrt(-2101/15
68*I*sqrt(7) - 55/32) - 21)*(-33*I*sqrt(7) + 56*sqrt(2101/1568*I*sqrt(7) - 55/32) + 63) + 99/2*I*sqrt(7) - 84*
sqrt(2101/1568*I*sqrt(7) - 55/32) - 1859/2) + 30976*x + 22671/2*I*sqrt(7) - 19236*sqrt(2101/1568*I*sqrt(7) - 5
5/32) + 53979/2) + 168*x*log(x) + 560)/x
________________________________________________________________________________________
Sympy [B] Leaf count of result is larger than twice the leaf count of optimal. 25507 vs.
\(2 (241) = 482\).
time = 19.42, size = 25507, normalized size = 90.77 \begin {gather*} \text {Too large to display} \end {gather*}
Verification of antiderivative is not currently implemented for this CAS.
[In]
integrate((2*x**3+3*x**2+x+5)/x**2/(2*x**4+x**3+5*x**2+x+2),x)
[Out]
-3*log(x)/4 + (3/16 - sqrt(-55/256 + 11*sqrt(77)/196))*log(x**2 + x*(10896479943156192*sqrt(77)/(-393650937856
00*sqrt(7)*sqrt(-245 + 64*sqrt(77)) - 815992034457600 + 6974290892800*sqrt(11)*sqrt(-245 + 64*sqrt(77)) + 2254
54628044800*sqrt(77)) + 1720992726634016*sqrt(7)*sqrt(-245 + 64*sqrt(77))/(-39365093785600*sqrt(7)*sqrt(-245 +
64*sqrt(77)) - 815992034457600 + 6974290892800*sqrt(11)*sqrt(-245 + 64*sqrt(77)) + 225454628044800*sqrt(77))
+ 396034568160*sqrt(14)*sqrt(-245 + 64*sqrt(77))*sqrt(-62589*sqrt(11)*sqrt(-245 + 64*sqrt(77)) - 21120*sqrt(7)
*sqrt(-245 + 64*sqrt(77)) - 103712*sqrt(77) + 5983777)/(-39365093785600*sqrt(7)*sqrt(-245 + 64*sqrt(77)) - 815
992034457600 + 6974290892800*sqrt(11)*sqrt(-245 + 64*sqrt(77)) + 225454628044800*sqrt(77)) + 1300300581888*sqr
t(154)*sqrt(-62589*sqrt(11)*sqrt(-245 + 64*sqrt(77)) - 21120*sqrt(7)*sqrt(-245 + 64*sqrt(77)) - 103712*sqrt(77
) + 5983777)/(-39365093785600*sqrt(7)*sqrt(-245 + 64*sqrt(77)) - 815992034457600 + 6974290892800*sqrt(11)*sqrt
(-245 + 64*sqrt(77)) + 225454628044800*sqrt(77)) - 278094051039*sqrt(22)*sqrt(-245 + 64*sqrt(77))*sqrt(-62589*
sqrt(11)*sqrt(-245 + 64*sqrt(77)) - 21120*sqrt(7)*sqrt(-245 + 64*sqrt(77)) - 103712*sqrt(77) + 5983777)/(-3936
5093785600*sqrt(7)*sqrt(-245 + 64*sqrt(77)) - 815992034457600 + 6974290892800*sqrt(11)*sqrt(-245 + 64*sqrt(77)
) + 225454628044800*sqrt(77)) - 29480043023893*sqrt(2)*sqrt(-62589*sqrt(11)*sqrt(-245 + 64*sqrt(77)) - 21120*s
qrt(7)*sqrt(-245 + 64*sqrt(77)) - 103712*sqrt(77) + 5983777)/(-39365093785600*sqrt(7)*sqrt(-245 + 64*sqrt(77))
- 815992034457600 + 6974290892800*sqrt(11)*sqrt(-245 + 64*sqrt(77)) + 225454628044800*sqrt(77)) - 49949438061
3858*sqrt(11)*sqrt(-245 + 64*sqrt(77))/(-39365093785600*sqrt(7)*sqrt(-245 + 64*sqrt(77)) - 815992034457600 + 6
974290892800*sqrt(11)*sqrt(-245 + 64*sqrt(77)) + 225454628044800*sqrt(77)) - 133336449027059894/(-393650937856
00*sqrt(7)*sqrt(-245 + 64*sqrt(77)) - 815992034457600 + 6974290892800*sqrt(11)*sqrt(-245 + 64*sqrt(77)) + 2254
54628044800*sqrt(77))) + 62476107871936200684235707503295184*sqrt(77)/(-12820275149960147338206904320000*sqrt(
77) - 978098111454293303592222720000*sqrt(7)*sqrt(-245 + 64*sqrt(77)) + 353171678628421216922828800000*sqrt(11
)*sqrt(-245 + 64*sqrt(77)) + 137638843164853174995608862720000) + 3325655347490676642136637231706384*sqrt(7)*s
qrt(-245 + 64*sqrt(77))/(-12820275149960147338206904320000*sqrt(77) - 978098111454293303592222720000*sqrt(7)*s
qrt(-245 + 64*sqrt(77)) + 353171678628421216922828800000*sqrt(11)*sqrt(-245 + 64*sqrt(77)) + 13763884316485317
4995608862720000) + 12591448063677487443028673736328*sqrt(154)*sqrt(-62589*sqrt(11)*sqrt(-245 + 64*sqrt(77)) -
21120*sqrt(7)*sqrt(-245 + 64*sqrt(77)) - 103712*sqrt(77) + 5983777)/(-12820275149960147338206904320000*sqrt(7
7) - 978098111454293303592222720000*sqrt(7)*sqrt(-245 + 64*sqrt(77)) + 353171678628421216922828800000*sqrt(11)
*sqrt(-245 + 64*sqrt(77)) + 137638843164853174995608862720000) + 1275262686986013252063099749736*sqrt(14)*sqrt
(-245 + 64*sqrt(77))*sqrt(-62589*sqrt(11)*sqrt(-245 + 64*sqrt(77)) - 21120*sqrt(7)*sqrt(-245 + 64*sqrt(77)) -
103712*sqrt(77) + 5983777)/(-12820275149960147338206904320000*sqrt(77) - 978098111454293303592222720000*sqrt(7
)*sqrt(-245 + 64*sqrt(77)) + 353171678628421216922828800000*sqrt(11)*sqrt(-245 + 64*sqrt(77)) + 13763884316485
3174995608862720000) - 1213346648248587045336001776855*sqrt(22)*sqrt(-245 + 64*sqrt(77))*sqrt(-62589*sqrt(11)*
sqrt(-245 + 64*sqrt(77)) - 21120*sqrt(7)*sqrt(-245 + 64*sqrt(77)) - 103712*sqrt(77) + 5983777)/(-1282027514996
0147338206904320000*sqrt(77) - 978098111454293303592222720000*sqrt(7)*sqrt(-245 + 64*sqrt(77)) + 3531716786284
21216922828800000*sqrt(11)*sqrt(-245 + 64*sqrt(77)) + 137638843164853174995608862720000) - 9883352419928750851
4073622742205*sqrt(2)*sqrt(-62589*sqrt(11)*sqrt(-245 + 64*sqrt(77)) - 21120*sqrt(7)*sqrt(-245 + 64*sqrt(77)) -
103712*sqrt(77) + 5983777)/(-12820275149960147338206904320000*sqrt(77) - 978098111454293303592222720000*sqrt(
7)*sqrt(-245 + 64*sqrt(77)) + 353171678628421216922828800000*sqrt(11)*sqrt(-245 + 64*sqrt(77)) + 1376388431648
53174995608862720000) - 3523282605099669306216811941636850*sqrt(11)*sqrt(-245 + 64*sqrt(77))/(-128202751499601
47338206904320000*sqrt(77) - 978098111454293303592222720000*sqrt(7)*sqrt(-245 + 64*sqrt(77)) + 353171678628421
216922828800000*sqrt(11)*sqrt(-245 + 64*sqrt(77)) + 137638843164853174995608862720000) - 496941299152482355176
771113608017254/(-12820275149960147338206904320000*sqrt(77) - 978098111454293303592222720000*sqrt(7)*sqrt(-245
+ 64*sqrt(77)) + 353171678628421216922828800000*sqrt(11)*sqrt(-245 + 64*sqrt(77)) + 1376388431648531749956088
62720000)) + (3/16 + sqrt(-55/256 + 11*sqrt(77)/196))*log(x**2 + x*(133336449027059894/(-225454628044800*sqrt(
77) - 39365093785600*sqrt(7)*sqrt(-245 + 64*sqrt(77)) + 6974290892800*sqrt(11)*sqrt(-245 + 64*sqrt(77)) + 8159
92034457600) + 1720992726634016*sqrt(7)*sqrt(-245 + 64*sqrt(77))/(-225454628044800*sqrt(77) - 39365093785600*s
qrt(7)*sqrt(-245 + 64*sqrt(77)) + 6974290892800...
________________________________________________________________________________________
Giac [F]
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \text {could not integrate} \end {gather*}
Verification of antiderivative is not currently implemented for this CAS.
[In]
integrate((2*x^3+3*x^2+x+5)/x^2/(2*x^4+x^3+5*x^2+x+2),x, algorithm="giac")
[Out]
integrate((2*x^3 + 3*x^2 + x + 5)/((2*x^4 + x^3 + 5*x^2 + x + 2)*x^2), x)
________________________________________________________________________________________
Mupad [B]
time = 2.30, size = 242, normalized size = 0.86 \begin {gather*} \left (\sum _{k=1}^4\ln \left (\frac {1199\,\mathrm {root}\left (z^4-\frac {3\,z^3}{4}+\frac {16\,z^2}{7}+\frac {96\,z}{49}+\frac {128}{343},z,k\right )}{32}+25\,x+\frac {\mathrm {root}\left (z^4-\frac {3\,z^3}{4}+\frac {16\,z^2}{7}+\frac {96\,z}{49}+\frac {128}{343},z,k\right )\,x\,4169}{32}+\frac {{\mathrm {root}\left (z^4-\frac {3\,z^3}{4}+\frac {16\,z^2}{7}+\frac {96\,z}{49}+\frac {128}{343},z,k\right )}^2\,x\,43993}{256}+{\mathrm {root}\left (z^4-\frac {3\,z^3}{4}+\frac {16\,z^2}{7}+\frac {96\,z}{49}+\frac {128}{343},z,k\right )}^3\,x\,28+\frac {{\mathrm {root}\left (z^4-\frac {3\,z^3}{4}+\frac {16\,z^2}{7}+\frac {96\,z}{49}+\frac {128}{343},z,k\right )}^4\,x\,3675}{32}+\frac {11647\,{\mathrm {root}\left (z^4-\frac {3\,z^3}{4}+\frac {16\,z^2}{7}+\frac {96\,z}{49}+\frac {128}{343},z,k\right )}^2}{128}+\frac {7273\,{\mathrm {root}\left (z^4-\frac {3\,z^3}{4}+\frac {16\,z^2}{7}+\frac {96\,z}{49}+\frac {128}{343},z,k\right )}^3}{128}-\frac {441\,{\mathrm {root}\left (z^4-\frac {3\,z^3}{4}+\frac {16\,z^2}{7}+\frac {96\,z}{49}+\frac {128}{343},z,k\right )}^4}{32}+\frac {21}{4}\right )\,\mathrm {root}\left (z^4-\frac {3\,z^3}{4}+\frac {16\,z^2}{7}+\frac {96\,z}{49}+\frac {128}{343},z,k\right )\right )-\frac {3\,\ln \left (x\right )}{4}-\frac {5}{2\,x} \end {gather*}
Verification of antiderivative is not currently implemented for this CAS.
[In]
int((x + 3*x^2 + 2*x^3 + 5)/(x^2*(x + 5*x^2 + x^3 + 2*x^4 + 2)),x)
[Out]
symsum(log((1199*root(z^4 - (3*z^3)/4 + (16*z^2)/7 + (96*z)/49 + 128/343, z, k))/32 + 25*x + (4169*root(z^4 -
(3*z^3)/4 + (16*z^2)/7 + (96*z)/49 + 128/343, z, k)*x)/32 + (43993*root(z^4 - (3*z^3)/4 + (16*z^2)/7 + (96*z)/
49 + 128/343, z, k)^2*x)/256 + 28*root(z^4 - (3*z^3)/4 + (16*z^2)/7 + (96*z)/49 + 128/343, z, k)^3*x + (3675*r
oot(z^4 - (3*z^3)/4 + (16*z^2)/7 + (96*z)/49 + 128/343, z, k)^4*x)/32 + (11647*root(z^4 - (3*z^3)/4 + (16*z^2)
/7 + (96*z)/49 + 128/343, z, k)^2)/128 + (7273*root(z^4 - (3*z^3)/4 + (16*z^2)/7 + (96*z)/49 + 128/343, z, k)^
3)/128 - (441*root(z^4 - (3*z^3)/4 + (16*z^2)/7 + (96*z)/49 + 128/343, z, k)^4)/32 + 21/4)*root(z^4 - (3*z^3)/
4 + (16*z^2)/7 + (96*z)/49 + 128/343, z, k), k, 1, 4) - (3*log(x))/4 - 5/(2*x)
________________________________________________________________________________________