3.14.5 \(\int \frac {6 x^2+6 x^3+(-216+1296 x+54 x^2-396 x^3) \log (x)+(108-648 x-9 x^2+210 x^3) \log (x) \log (\log (x))+(-18+108 x-36 x^3) \log (x) \log ^2(\log (x))+(1-6 x+2 x^3) \log (x) \log ^3(\log (x))}{(-216-432 x-216 x^2) \log (x)+(108+216 x+108 x^2) \log (x) \log (\log (x))+(-18-36 x-18 x^2) \log (x) \log ^2(\log (x))+(1+2 x+x^2) \log (x) \log ^3(\log (x))} \, dx\)

Optimal. Leaf size=30 \[ x \left (-4+x-\frac {5-\frac {3 x^2}{(6-\log (\log (x)))^2}}{-1-x}\right ) \]

________________________________________________________________________________________

Rubi [F]  time = 1.28, antiderivative size = 0, normalized size of antiderivative = 0.00, number of steps used = 0, number of rules used = 0, integrand size = 0, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.000, Rules used = {} \begin {gather*} \int \frac {6 x^2+6 x^3+\left (-216+1296 x+54 x^2-396 x^3\right ) \log (x)+\left (108-648 x-9 x^2+210 x^3\right ) \log (x) \log (\log (x))+\left (-18+108 x-36 x^3\right ) \log (x) \log ^2(\log (x))+\left (1-6 x+2 x^3\right ) \log (x) \log ^3(\log (x))}{\left (-216-432 x-216 x^2\right ) \log (x)+\left (108+216 x+108 x^2\right ) \log (x) \log (\log (x))+\left (-18-36 x-18 x^2\right ) \log (x) \log ^2(\log (x))+\left (1+2 x+x^2\right ) \log (x) \log ^3(\log (x))} \, dx \end {gather*}

Verification is not applicable to the result.

[In]

Int[(6*x^2 + 6*x^3 + (-216 + 1296*x + 54*x^2 - 396*x^3)*Log[x] + (108 - 648*x - 9*x^2 + 210*x^3)*Log[x]*Log[Lo
g[x]] + (-18 + 108*x - 36*x^3)*Log[x]*Log[Log[x]]^2 + (1 - 6*x + 2*x^3)*Log[x]*Log[Log[x]]^3)/((-216 - 432*x -
216*x^2)*Log[x] + (108 + 216*x + 108*x^2)*Log[x]*Log[Log[x]] + (-18 - 36*x - 18*x^2)*Log[x]*Log[Log[x]]^2 + (
1 + 2*x + x^2)*Log[x]*Log[Log[x]]^3),x]

[Out]

-4*x + x^2 - 5/(1 + x) - 6*Defer[Int][1/(Log[x]*(-6 + Log[Log[x]])^3), x] + 6*Defer[Int][x/(Log[x]*(-6 + Log[L
og[x]])^3), x] + 6*Defer[Int][1/((1 + x)*Log[x]*(-6 + Log[Log[x]])^3), x] + 3*Defer[Int][(-6 + Log[Log[x]])^(-
2), x] - 6*Defer[Int][x/(-6 + Log[Log[x]])^2, x] - 3*Defer[Int][1/((1 + x)^2*(-6 + Log[Log[x]])^2), x]

Rubi steps

\begin {gather*} \begin {aligned} \text {integral} &=\int \frac {-6 x^2 (1+x)-\log (x) (-6+\log (\log (x))) \left (36-216 x-9 x^2+66 x^3-12 \left (1-6 x+2 x^3\right ) \log (\log (x))+\left (1-6 x+2 x^3\right ) \log ^2(\log (x))\right )}{(1+x)^2 \log (x) (6-\log (\log (x)))^3} \, dx\\ &=\int \left (\frac {1-6 x+2 x^3}{(1+x)^2}+\frac {6 x^2}{(1+x) \log (x) (-6+\log (\log (x)))^3}-\frac {3 x^2 (3+2 x)}{(1+x)^2 (-6+\log (\log (x)))^2}\right ) \, dx\\ &=-\left (3 \int \frac {x^2 (3+2 x)}{(1+x)^2 (-6+\log (\log (x)))^2} \, dx\right )+6 \int \frac {x^2}{(1+x) \log (x) (-6+\log (\log (x)))^3} \, dx+\int \frac {1-6 x+2 x^3}{(1+x)^2} \, dx\\ &=-\left (3 \int \left (-\frac {1}{(-6+\log (\log (x)))^2}+\frac {2 x}{(-6+\log (\log (x)))^2}+\frac {1}{(1+x)^2 (-6+\log (\log (x)))^2}\right ) \, dx\right )+6 \int \left (-\frac {1}{\log (x) (-6+\log (\log (x)))^3}+\frac {x}{\log (x) (-6+\log (\log (x)))^3}+\frac {1}{(1+x) \log (x) (-6+\log (\log (x)))^3}\right ) \, dx+\int \left (-4+2 x+\frac {5}{(1+x)^2}\right ) \, dx\\ &=-4 x+x^2-\frac {5}{1+x}+3 \int \frac {1}{(-6+\log (\log (x)))^2} \, dx-3 \int \frac {1}{(1+x)^2 (-6+\log (\log (x)))^2} \, dx-6 \int \frac {1}{\log (x) (-6+\log (\log (x)))^3} \, dx+6 \int \frac {x}{\log (x) (-6+\log (\log (x)))^3} \, dx+6 \int \frac {1}{(1+x) \log (x) (-6+\log (\log (x)))^3} \, dx-6 \int \frac {x}{(-6+\log (\log (x)))^2} \, dx\\ \end {aligned} \end {gather*}

________________________________________________________________________________________

Mathematica [A]  time = 0.07, size = 31, normalized size = 1.03 \begin {gather*} -4 x+x^2-\frac {5}{1+x}-\frac {3 x^3}{(1+x) (-6+\log (\log (x)))^2} \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[(6*x^2 + 6*x^3 + (-216 + 1296*x + 54*x^2 - 396*x^3)*Log[x] + (108 - 648*x - 9*x^2 + 210*x^3)*Log[x]*
Log[Log[x]] + (-18 + 108*x - 36*x^3)*Log[x]*Log[Log[x]]^2 + (1 - 6*x + 2*x^3)*Log[x]*Log[Log[x]]^3)/((-216 - 4
32*x - 216*x^2)*Log[x] + (108 + 216*x + 108*x^2)*Log[x]*Log[Log[x]] + (-18 - 36*x - 18*x^2)*Log[x]*Log[Log[x]]
^2 + (1 + 2*x + x^2)*Log[x]*Log[Log[x]]^3),x]

[Out]

-4*x + x^2 - 5/(1 + x) - (3*x^3)/((1 + x)*(-6 + Log[Log[x]])^2)

________________________________________________________________________________________

fricas [B]  time = 0.73, size = 77, normalized size = 2.57 \begin {gather*} \frac {33 \, x^{3} + {\left (x^{3} - 3 \, x^{2} - 4 \, x - 5\right )} \log \left (\log \relax (x)\right )^{2} - 108 \, x^{2} - 12 \, {\left (x^{3} - 3 \, x^{2} - 4 \, x - 5\right )} \log \left (\log \relax (x)\right ) - 144 \, x - 180}{{\left (x + 1\right )} \log \left (\log \relax (x)\right )^{2} - 12 \, {\left (x + 1\right )} \log \left (\log \relax (x)\right ) + 36 \, x + 36} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(((2*x^3-6*x+1)*log(x)*log(log(x))^3+(-36*x^3+108*x-18)*log(x)*log(log(x))^2+(210*x^3-9*x^2-648*x+108
)*log(x)*log(log(x))+(-396*x^3+54*x^2+1296*x-216)*log(x)+6*x^3+6*x^2)/((x^2+2*x+1)*log(x)*log(log(x))^3+(-18*x
^2-36*x-18)*log(x)*log(log(x))^2+(108*x^2+216*x+108)*log(x)*log(log(x))+(-216*x^2-432*x-216)*log(x)),x, algori
thm="fricas")

[Out]

(33*x^3 + (x^3 - 3*x^2 - 4*x - 5)*log(log(x))^2 - 108*x^2 - 12*(x^3 - 3*x^2 - 4*x - 5)*log(log(x)) - 144*x - 1
80)/((x + 1)*log(log(x))^2 - 12*(x + 1)*log(log(x)) + 36*x + 36)

________________________________________________________________________________________

giac [A]  time = 0.62, size = 49, normalized size = 1.63 \begin {gather*} x^{2} - \frac {3 \, x^{3}}{x \log \left (\log \relax (x)\right )^{2} - 12 \, x \log \left (\log \relax (x)\right ) + \log \left (\log \relax (x)\right )^{2} + 36 \, x - 12 \, \log \left (\log \relax (x)\right ) + 36} - 4 \, x - \frac {5}{x + 1} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(((2*x^3-6*x+1)*log(x)*log(log(x))^3+(-36*x^3+108*x-18)*log(x)*log(log(x))^2+(210*x^3-9*x^2-648*x+108
)*log(x)*log(log(x))+(-396*x^3+54*x^2+1296*x-216)*log(x)+6*x^3+6*x^2)/((x^2+2*x+1)*log(x)*log(log(x))^3+(-18*x
^2-36*x-18)*log(x)*log(log(x))^2+(108*x^2+216*x+108)*log(x)*log(log(x))+(-216*x^2-432*x-216)*log(x)),x, algori
thm="giac")

[Out]

x^2 - 3*x^3/(x*log(log(x))^2 - 12*x*log(log(x)) + log(log(x))^2 + 36*x - 12*log(log(x)) + 36) - 4*x - 5/(x + 1
)

________________________________________________________________________________________

maple [A]  time = 0.06, size = 38, normalized size = 1.27

method	result	size
risch	\(\frac {x^{3}-3 x^{2}-4 x -5}{x +1}-\frac {3 x^{3}}{\left (x +1\right ) \left (\ln \left (\ln \relax (x )\right )-6\right )^{2}}\)	\(38\)

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(((2*x^3-6*x+1)*ln(x)*ln(ln(x))^3+(-36*x^3+108*x-18)*ln(x)*ln(ln(x))^2+(210*x^3-9*x^2-648*x+108)*ln(x)*ln(l
n(x))+(-396*x^3+54*x^2+1296*x-216)*ln(x)+6*x^3+6*x^2)/((x^2+2*x+1)*ln(x)*ln(ln(x))^3+(-18*x^2-36*x-18)*ln(x)*l
n(ln(x))^2+(108*x^2+216*x+108)*ln(x)*ln(ln(x))+(-216*x^2-432*x-216)*ln(x)),x,method=_RETURNVERBOSE)

[Out]

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

________________________________________________________________________________________

maxima [B]  time = 0.54, size = 77, normalized size = 2.57 \begin {gather*} \frac {33 \, x^{3} + {\left (x^{3} - 3 \, x^{2} - 4 \, x - 5\right )} \log \left (\log \relax (x)\right )^{2} - 108 \, x^{2} - 12 \, {\left (x^{3} - 3 \, x^{2} - 4 \, x - 5\right )} \log \left (\log \relax (x)\right ) - 144 \, x - 180}{{\left (x + 1\right )} \log \left (\log \relax (x)\right )^{2} - 12 \, {\left (x + 1\right )} \log \left (\log \relax (x)\right ) + 36 \, x + 36} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(((2*x^3-6*x+1)*log(x)*log(log(x))^3+(-36*x^3+108*x-18)*log(x)*log(log(x))^2+(210*x^3-9*x^2-648*x+108
)*log(x)*log(log(x))+(-396*x^3+54*x^2+1296*x-216)*log(x)+6*x^3+6*x^2)/((x^2+2*x+1)*log(x)*log(log(x))^3+(-18*x
^2-36*x-18)*log(x)*log(log(x))^2+(108*x^2+216*x+108)*log(x)*log(log(x))+(-216*x^2-432*x-216)*log(x)),x, algori
thm="maxima")

[Out]

(33*x^3 + (x^3 - 3*x^2 - 4*x - 5)*log(log(x))^2 - 108*x^2 - 12*(x^3 - 3*x^2 - 4*x - 5)*log(log(x)) - 144*x - 1
80)/((x + 1)*log(log(x))^2 - 12*(x + 1)*log(log(x)) + 36*x + 36)

________________________________________________________________________________________

mupad [B]  time = 1.38, size = 259, normalized size = 8.63 \begin {gather*} x^2-\frac {5}{x+1}-\frac {\frac {3\,x\,\left (9\,x^2\,\ln \relax (x)+6\,x^3\,\ln \relax (x)+x^2+x^3\right )}{{\left (x+1\right )}^2}-\frac {3\,x\,\ln \left (\ln \relax (x)\right )\,\ln \relax (x)\,\left (2\,x^3+3\,x^2\right )}{2\,{\left (x+1\right )}^2}}{{\ln \left (\ln \relax (x)\right )}^2-12\,\ln \left (\ln \relax (x)\right )+36}-\frac {\frac {3\,x\,\ln \relax (x)\,\left (54\,x^2\,\ln \relax (x)+66\,x^3\,\ln \relax (x)+24\,x^4\,\ln \relax (x)+21\,x^2+35\,x^3+14\,x^4\right )}{2\,{\left (x+1\right )}^3}-\frac {3\,x\,\ln \left (\ln \relax (x)\right )\,\ln \relax (x)\,\left (9\,x^2\,\ln \relax (x)+11\,x^3\,\ln \relax (x)+4\,x^4\,\ln \relax (x)+3\,x^2+5\,x^3+2\,x^4\right )}{2\,{\left (x+1\right )}^3}}{\ln \left (\ln \relax (x)\right )-6}-4\,x+{\ln \relax (x)}^2\,\left (\frac {-6\,x^5-\frac {33\,x^4}{2}+\frac {81\,x^2}{2}+\frac {81\,x}{2}+\frac {27}{2}}{x^3+3\,x^2+3\,x+1}-\frac {27}{2}\right )-\frac {\ln \relax (x)\,\left (3\,x^4+\frac {9\,x^3}{2}\right )}{x^2+2\,x+1} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(-(6*x^2 + 6*x^3 + log(x)*(1296*x + 54*x^2 - 396*x^3 - 216) - log(log(x))*log(x)*(648*x + 9*x^2 - 210*x^3 -
108) + log(log(x))^3*log(x)*(2*x^3 - 6*x + 1) - log(log(x))^2*log(x)*(36*x^3 - 108*x + 18))/(log(x)*(432*x +
216*x^2 + 216) - log(log(x))*log(x)*(216*x + 108*x^2 + 108) - log(log(x))^3*log(x)*(2*x + x^2 + 1) + log(log(x
))^2*log(x)*(36*x + 18*x^2 + 18)),x)

[Out]

x^2 - 5/(x + 1) - ((3*x*(9*x^2*log(x) + 6*x^3*log(x) + x^2 + x^3))/(x + 1)^2 - (3*x*log(log(x))*log(x)*(3*x^2
+ 2*x^3))/(2*(x + 1)^2))/(log(log(x))^2 - 12*log(log(x)) + 36) - ((3*x*log(x)*(54*x^2*log(x) + 66*x^3*log(x) +
24*x^4*log(x) + 21*x^2 + 35*x^3 + 14*x^4))/(2*(x + 1)^3) - (3*x*log(log(x))*log(x)*(9*x^2*log(x) + 11*x^3*log
(x) + 4*x^4*log(x) + 3*x^2 + 5*x^3 + 2*x^4))/(2*(x + 1)^3))/(log(log(x)) - 6) - 4*x + log(x)^2*(((81*x)/2 + (8
1*x^2)/2 - (33*x^4)/2 - 6*x^5 + 27/2)/(3*x + 3*x^2 + x^3 + 1) - 27/2) - (log(x)*((9*x^3)/2 + 3*x^4))/(2*x + x^
2 + 1)

________________________________________________________________________________________

sympy [A]  time = 0.35, size = 42, normalized size = 1.40 \begin {gather*} - \frac {3 x^{3}}{36 x + \left (- 12 x - 12\right ) \log {\left (\log {\relax (x )} \right )} + \left (x + 1\right ) \log {\left (\log {\relax (x )} \right )}^{2} + 36} + x^{2} - 4 x - \frac {5}{x + 1} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(((2*x**3-6*x+1)*ln(x)*ln(ln(x))**3+(-36*x**3+108*x-18)*ln(x)*ln(ln(x))**2+(210*x**3-9*x**2-648*x+108
)*ln(x)*ln(ln(x))+(-396*x**3+54*x**2+1296*x-216)*ln(x)+6*x**3+6*x**2)/((x**2+2*x+1)*ln(x)*ln(ln(x))**3+(-18*x*
*2-36*x-18)*ln(x)*ln(ln(x))**2+(108*x**2+216*x+108)*ln(x)*ln(ln(x))+(-216*x**2-432*x-216)*ln(x)),x)

[Out]

-3*x**3/(36*x + (-12*x - 12)*log(log(x)) + (x + 1)*log(log(x))**2 + 36) + x**2 - 4*x - 5/(x + 1)

________________________________________________________________________________________