3.63.49 \(\int \frac {(8 x^2-50 x^3-2 x^4-16 x^5+100 x^6+4 x^7) \log ^2(\frac {1}{x})+(8-50 x-2 x^2) \log (4-25 x-x^2)+\log (\frac {1}{x}) (-50 x-4 x^2+(-8+50 x+2 x^2) \log (4-25 x-x^2))}{(-4 x^2+25 x^3+x^4) \log ^2(\frac {1}{x})} \, dx\)

Optimal. Leaf size=27 \[ x^4-2 \left (x+\frac {\log (4-x (25+x))}{x \log \left (\frac {1}{x}\right )}\right ) \]

________________________________________________________________________________________

Rubi [F]  time = 1.76, 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 {\left (8 x^2-50 x^3-2 x^4-16 x^5+100 x^6+4 x^7\right ) \log ^2\left (\frac {1}{x}\right )+\left (8-50 x-2 x^2\right ) \log \left (4-25 x-x^2\right )+\log \left (\frac {1}{x}\right ) \left (-50 x-4 x^2+\left (-8+50 x+2 x^2\right ) \log \left (4-25 x-x^2\right )\right )}{\left (-4 x^2+25 x^3+x^4\right ) \log ^2\left (\frac {1}{x}\right )} \, dx \end {gather*}

Verification is not applicable to the result.

[In]

Int[((8*x^2 - 50*x^3 - 2*x^4 - 16*x^5 + 100*x^6 + 4*x^7)*Log[x^(-1)]^2 + (8 - 50*x - 2*x^2)*Log[4 - 25*x - x^2
] + Log[x^(-1)]*(-50*x - 4*x^2 + (-8 + 50*x + 2*x^2)*Log[4 - 25*x - x^2]))/((-4*x^2 + 25*x^3 + x^4)*Log[x^(-1)
]^2),x]

[Out]

-2*x + x^4 - 2*Log[4 - 25*x - x^2]*LogIntegral[x^(-1)] + 2*Defer[Int][(-25 - 2*x)/(x*(-4 + 25*x + x^2)*Log[x^(
-1)]), x] - 2*Defer[Int][Log[4 - 25*x - x^2]/(x^2*Log[x^(-1)]^2), x] - (100*Defer[Int][LogIntegral[x^(-1)]/(-2
5 + Sqrt[641] - 2*x), x])/Sqrt[641] + (4*(641 - 25*Sqrt[641])*Defer[Int][LogIntegral[x^(-1)]/(25 - Sqrt[641] +
2*x), x])/641 - (100*Defer[Int][LogIntegral[x^(-1)]/(25 + Sqrt[641] + 2*x), x])/Sqrt[641] + (4*(641 + 25*Sqrt
[641])*Defer[Int][LogIntegral[x^(-1)]/(25 + Sqrt[641] + 2*x), x])/641

Rubi steps

\begin {gather*} \begin {aligned} \text {integral} &=\int \frac {\left (8 x^2-50 x^3-2 x^4-16 x^5+100 x^6+4 x^7\right ) \log ^2\left (\frac {1}{x}\right )+\left (8-50 x-2 x^2\right ) \log \left (4-25 x-x^2\right )+\log \left (\frac {1}{x}\right ) \left (-50 x-4 x^2+\left (-8+50 x+2 x^2\right ) \log \left (4-25 x-x^2\right )\right )}{x^2 \left (-4+25 x+x^2\right ) \log ^2\left (\frac {1}{x}\right )} \, dx\\ &=\int \left (\frac {2 \left (-25-2 x+4 x \log \left (\frac {1}{x}\right )-25 x^2 \log \left (\frac {1}{x}\right )-x^3 \log \left (\frac {1}{x}\right )-8 x^4 \log \left (\frac {1}{x}\right )+50 x^5 \log \left (\frac {1}{x}\right )+2 x^6 \log \left (\frac {1}{x}\right )\right )}{x \left (-4+25 x+x^2\right ) \log \left (\frac {1}{x}\right )}+\frac {2 \left (-1+\log \left (\frac {1}{x}\right )\right ) \log \left (4-25 x-x^2\right )}{x^2 \log ^2\left (\frac {1}{x}\right )}\right ) \, dx\\ &=2 \int \frac {-25-2 x+4 x \log \left (\frac {1}{x}\right )-25 x^2 \log \left (\frac {1}{x}\right )-x^3 \log \left (\frac {1}{x}\right )-8 x^4 \log \left (\frac {1}{x}\right )+50 x^5 \log \left (\frac {1}{x}\right )+2 x^6 \log \left (\frac {1}{x}\right )}{x \left (-4+25 x+x^2\right ) \log \left (\frac {1}{x}\right )} \, dx+2 \int \frac {\left (-1+\log \left (\frac {1}{x}\right )\right ) \log \left (4-25 x-x^2\right )}{x^2 \log ^2\left (\frac {1}{x}\right )} \, dx\\ &=2 \int \frac {25+2 x-x \left (4-25 x-x^2-8 x^3+50 x^4+2 x^5\right ) \log \left (\frac {1}{x}\right )}{x \left (4-25 x-x^2\right ) \log \left (\frac {1}{x}\right )} \, dx+2 \int \left (-\frac {\log \left (4-25 x-x^2\right )}{x^2 \log ^2\left (\frac {1}{x}\right )}+\frac {\log \left (4-25 x-x^2\right )}{x^2 \log \left (\frac {1}{x}\right )}\right ) \, dx\\ &=2 \int \left (-1+2 x^3+\frac {-25-2 x}{x \left (-4+25 x+x^2\right ) \log \left (\frac {1}{x}\right )}\right ) \, dx-2 \int \frac {\log \left (4-25 x-x^2\right )}{x^2 \log ^2\left (\frac {1}{x}\right )} \, dx+2 \int \frac {\log \left (4-25 x-x^2\right )}{x^2 \log \left (\frac {1}{x}\right )} \, dx\\ &=-2 x+x^4-2 \log \left (4-25 x-x^2\right ) \text {li}\left (\frac {1}{x}\right )+2 \int \frac {-25-2 x}{x \left (-4+25 x+x^2\right ) \log \left (\frac {1}{x}\right )} \, dx-2 \int \frac {\log \left (4-25 x-x^2\right )}{x^2 \log ^2\left (\frac {1}{x}\right )} \, dx+2 \int \frac {(-25-2 x) \text {li}\left (\frac {1}{x}\right )}{4-25 x-x^2} \, dx\\ &=-2 x+x^4-2 \log \left (4-25 x-x^2\right ) \text {li}\left (\frac {1}{x}\right )+2 \int \frac {-25-2 x}{x \left (-4+25 x+x^2\right ) \log \left (\frac {1}{x}\right )} \, dx-2 \int \frac {\log \left (4-25 x-x^2\right )}{x^2 \log ^2\left (\frac {1}{x}\right )} \, dx+2 \int \left (\frac {25 \text {li}\left (\frac {1}{x}\right )}{-4+25 x+x^2}+\frac {2 x \text {li}\left (\frac {1}{x}\right )}{-4+25 x+x^2}\right ) \, dx\\ &=-2 x+x^4-2 \log \left (4-25 x-x^2\right ) \text {li}\left (\frac {1}{x}\right )+2 \int \frac {-25-2 x}{x \left (-4+25 x+x^2\right ) \log \left (\frac {1}{x}\right )} \, dx-2 \int \frac {\log \left (4-25 x-x^2\right )}{x^2 \log ^2\left (\frac {1}{x}\right )} \, dx+4 \int \frac {x \text {li}\left (\frac {1}{x}\right )}{-4+25 x+x^2} \, dx+50 \int \frac {\text {li}\left (\frac {1}{x}\right )}{-4+25 x+x^2} \, dx\\ &=-2 x+x^4-2 \log \left (4-25 x-x^2\right ) \text {li}\left (\frac {1}{x}\right )+2 \int \frac {-25-2 x}{x \left (-4+25 x+x^2\right ) \log \left (\frac {1}{x}\right )} \, dx-2 \int \frac {\log \left (4-25 x-x^2\right )}{x^2 \log ^2\left (\frac {1}{x}\right )} \, dx+4 \int \left (\frac {\left (1-\frac {25}{\sqrt {641}}\right ) \text {li}\left (\frac {1}{x}\right )}{25-\sqrt {641}+2 x}+\frac {\left (1+\frac {25}{\sqrt {641}}\right ) \text {li}\left (\frac {1}{x}\right )}{25+\sqrt {641}+2 x}\right ) \, dx+50 \int \left (-\frac {2 \text {li}\left (\frac {1}{x}\right )}{\sqrt {641} \left (-25+\sqrt {641}-2 x\right )}-\frac {2 \text {li}\left (\frac {1}{x}\right )}{\sqrt {641} \left (25+\sqrt {641}+2 x\right )}\right ) \, dx\\ &=-2 x+x^4-2 \log \left (4-25 x-x^2\right ) \text {li}\left (\frac {1}{x}\right )+2 \int \frac {-25-2 x}{x \left (-4+25 x+x^2\right ) \log \left (\frac {1}{x}\right )} \, dx-2 \int \frac {\log \left (4-25 x-x^2\right )}{x^2 \log ^2\left (\frac {1}{x}\right )} \, dx-\frac {100 \int \frac {\text {li}\left (\frac {1}{x}\right )}{-25+\sqrt {641}-2 x} \, dx}{\sqrt {641}}-\frac {100 \int \frac {\text {li}\left (\frac {1}{x}\right )}{25+\sqrt {641}+2 x} \, dx}{\sqrt {641}}+\frac {1}{641} \left (4 \left (641-25 \sqrt {641}\right )\right ) \int \frac {\text {li}\left (\frac {1}{x}\right )}{25-\sqrt {641}+2 x} \, dx+\frac {1}{641} \left (4 \left (641+25 \sqrt {641}\right )\right ) \int \frac {\text {li}\left (\frac {1}{x}\right )}{25+\sqrt {641}+2 x} \, dx\\ \end {aligned} \end {gather*}

________________________________________________________________________________________

Mathematica [A]  time = 0.07, size = 35, normalized size = 1.30 \begin {gather*} 2 \left (-x+\frac {x^4}{2}-\frac {\log \left (4-25 x-x^2\right )}{x \log \left (\frac {1}{x}\right )}\right ) \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[((8*x^2 - 50*x^3 - 2*x^4 - 16*x^5 + 100*x^6 + 4*x^7)*Log[x^(-1)]^2 + (8 - 50*x - 2*x^2)*Log[4 - 25*x
- x^2] + Log[x^(-1)]*(-50*x - 4*x^2 + (-8 + 50*x + 2*x^2)*Log[4 - 25*x - x^2]))/((-4*x^2 + 25*x^3 + x^4)*Log[
x^(-1)]^2),x]

[Out]

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

________________________________________________________________________________________

fricas [A]  time = 0.91, size = 38, normalized size = 1.41 \begin {gather*} \frac {{\left (x^{5} - 2 \, x^{2}\right )} \log \left (\frac {1}{x}\right ) - 2 \, \log \left (-x^{2} - 25 \, x + 4\right )}{x \log \left (\frac {1}{x}\right )} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(((4*x^7+100*x^6-16*x^5-2*x^4-50*x^3+8*x^2)*log(1/x)^2+((2*x^2+50*x-8)*log(-x^2-25*x+4)-4*x^2-50*x)*l
og(1/x)+(-2*x^2-50*x+8)*log(-x^2-25*x+4))/(x^4+25*x^3-4*x^2)/log(1/x)^2,x, algorithm="fricas")

[Out]

((x^5 - 2*x^2)*log(1/x) - 2*log(-x^2 - 25*x + 4))/(x*log(1/x))

________________________________________________________________________________________

giac [A]  time = 0.18, size = 27, normalized size = 1.00 \begin {gather*} x^{4} - 2 \, x + \frac {2 \, \log \left (-x^{2} - 25 \, x + 4\right )}{x \log \relax (x)} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(((4*x^7+100*x^6-16*x^5-2*x^4-50*x^3+8*x^2)*log(1/x)^2+((2*x^2+50*x-8)*log(-x^2-25*x+4)-4*x^2-50*x)*l
og(1/x)+(-2*x^2-50*x+8)*log(-x^2-25*x+4))/(x^4+25*x^3-4*x^2)/log(1/x)^2,x, algorithm="giac")

[Out]

x^4 - 2*x + 2*log(-x^2 - 25*x + 4)/(x*log(x))

________________________________________________________________________________________

maple [A]  time = 0.10, size = 28, normalized size = 1.04

method	result	size
risch	\(\frac {2 \ln \left (-x^{2}-25 x +4\right )}{x \ln \relax (x )}+x^{4}-2 x\)	\(28\)

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(((4*x^7+100*x^6-16*x^5-2*x^4-50*x^3+8*x^2)*ln(1/x)^2+((2*x^2+50*x-8)*ln(-x^2-25*x+4)-4*x^2-50*x)*ln(1/x)+(
-2*x^2-50*x+8)*ln(-x^2-25*x+4))/(x^4+25*x^3-4*x^2)/ln(1/x)^2,x,method=_RETURNVERBOSE)

[Out]

2/x/ln(x)*ln(-x^2-25*x+4)+x^4-2*x

________________________________________________________________________________________

maxima [A]  time = 0.46, size = 34, normalized size = 1.26 \begin {gather*} \frac {{\left (x^{5} - 2 \, x^{2}\right )} \log \relax (x) + 2 \, \log \left (-x^{2} - 25 \, x + 4\right )}{x \log \relax (x)} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(((4*x^7+100*x^6-16*x^5-2*x^4-50*x^3+8*x^2)*log(1/x)^2+((2*x^2+50*x-8)*log(-x^2-25*x+4)-4*x^2-50*x)*l
og(1/x)+(-2*x^2-50*x+8)*log(-x^2-25*x+4))/(x^4+25*x^3-4*x^2)/log(1/x)^2,x, algorithm="maxima")

[Out]

((x^5 - 2*x^2)*log(x) + 2*log(-x^2 - 25*x + 4))/(x*log(x))

________________________________________________________________________________________

mupad [B]  time = 4.37, size = 29, normalized size = 1.07 \begin {gather*} x^4-2\,x-\frac {2\,\ln \left (-x^2-25\,x+4\right )}{x\,\ln \left (\frac {1}{x}\right )} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(-(log(4 - x^2 - 25*x)*(50*x + 2*x^2 - 8) - log(1/x)^2*(8*x^2 - 50*x^3 - 2*x^4 - 16*x^5 + 100*x^6 + 4*x^7)
+ log(1/x)*(50*x - log(4 - x^2 - 25*x)*(50*x + 2*x^2 - 8) + 4*x^2))/(log(1/x)^2*(25*x^3 - 4*x^2 + x^4)),x)

[Out]

x^4 - 2*x - (2*log(4 - x^2 - 25*x))/(x*log(1/x))

________________________________________________________________________________________

sympy [A]  time = 0.43, size = 24, normalized size = 0.89 \begin {gather*} x^{4} - 2 x - \frac {2 \log {\left (- x^{2} - 25 x + 4 \right )}}{x \log {\left (\frac {1}{x} \right )}} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(((4*x**7+100*x**6-16*x**5-2*x**4-50*x**3+8*x**2)*ln(1/x)**2+((2*x**2+50*x-8)*ln(-x**2-25*x+4)-4*x**2
-50*x)*ln(1/x)+(-2*x**2-50*x+8)*ln(-x**2-25*x+4))/(x**4+25*x**3-4*x**2)/ln(1/x)**2,x)

[Out]

x**4 - 2*x - 2*log(-x**2 - 25*x + 4)/(x*log(1/x))

________________________________________________________________________________________