3.69.40 \(\int \frac {18+6 \log (\log (\frac {-4+16 x^3}{9 x^3}))}{(-x+4 x^4) \log (\frac {-4+16 x^3}{9 x^3})} \, dx\) [6840]

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

[Out]

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

________________________________________________________________________________________

Rubi [A]
time = 0.09, antiderivative size = 20, normalized size of antiderivative = 1.00, number of steps used = 2, number of rules used = 2, integrand size = 49, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.041, Rules used = {1607, 6818} \begin {gather*} \left (\log \left (\log \left (-\frac {4 \left (1-4 x^3\right )}{9 x^3}\right )\right )+3\right )^2 \end {gather*}

Antiderivative was successfully verified.

[In]

Int[(18 + 6*Log[Log[(-4 + 16*x^3)/(9*x^3)]])/((-x + 4*x^4)*Log[(-4 + 16*x^3)/(9*x^3)]),x]

[Out]

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

Rule 1607

Int[(u_.)*((a_.)*(x_)^(p_.) + (b_.)*(x_)^(q_.))^(n_.), x_Symbol] :> Int[u*x^(n*p)*(a + b*x^(q - p))^n, x] /; F
reeQ[{a, b, p, q}, x] && IntegerQ[n] && PosQ[q - p]

Rule 6818

Int[(u_)*(y_)^(m_.), x_Symbol] :> With[{q = DerivativeDivides[y, u, x]}, Simp[q*(y^(m + 1)/(m + 1)), x] /;  !F
alseQ[q]] /; FreeQ[m, x] && NeQ[m, -1]

Rubi steps

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

________________________________________________________________________________________

Mathematica [A]
time = 0.02, size = 17, normalized size = 0.85 \begin {gather*} \left (3+\log \left (\log \left (\frac {4}{9} \left (4-\frac {1}{x^3}\right )\right )\right )\right )^2 \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[(18 + 6*Log[Log[(-4 + 16*x^3)/(9*x^3)]])/((-x + 4*x^4)*Log[(-4 + 16*x^3)/(9*x^3)]),x]

[Out]

(3 + Log[Log[(4*(4 - x^(-3)))/9]])^2

________________________________________________________________________________________

Maple [B] Leaf count of result is larger than twice the leaf count of optimal. \(45\) vs. \(2(18)=36\).
time = 0.68, size = 46, normalized size = 2.30

method	result	size
default	\(\ln \left (2 \ln \left (2\right )-2 \ln \left (3\right )+\ln \left (\frac {4 x^{3}-1}{x^{3}}\right )\right )^{2}+6 \ln \left (2 \ln \left (2\right )-2 \ln \left (3\right )+\ln \left (4-\frac {1}{x^{3}}\right )\right )\)	\(46\)

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((6*ln(ln(1/9*(16*x^3-4)/x^3))+18)/(4*x^4-x)/ln(1/9*(16*x^3-4)/x^3),x,method=_RETURNVERBOSE)

[Out]

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

________________________________________________________________________________________

Maxima [B] Leaf count of result is larger than twice the leaf count of optimal. 84 vs. \(2 (18) = 36\).
time = 0.51, size = 84, normalized size = 4.20 \begin {gather*} -\log \left (-2 \, \log \left (3\right ) + 2 \, \log \left (2\right ) + \log \left (4 \, x^{3} - 1\right ) - 3 \, \log \left (x\right )\right )^{2} + 2 \, \log \left (-2 \, \log \left (3\right ) + 2 \, \log \left (2\right ) + \log \left (4 \, x^{3} - 1\right ) - 3 \, \log \left (x\right )\right ) \log \left (\log \left (-\frac {4}{9 \, x^{3}} + \frac {16}{9}\right )\right ) + 6 \, \log \left (-2 \, \log \left (3\right ) + 2 \, \log \left (2\right ) + \log \left (4 \, x^{3} - 1\right ) - 3 \, \log \left (x\right )\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((6*log(log(1/9*(16*x^3-4)/x^3))+18)/(4*x^4-x)/log(1/9*(16*x^3-4)/x^3),x, algorithm="maxima")

[Out]

-log(-2*log(3) + 2*log(2) + log(4*x^3 - 1) - 3*log(x))^2 + 2*log(-2*log(3) + 2*log(2) + log(4*x^3 - 1) - 3*log
(x))*log(log(-4/9/x^3 + 16/9)) + 6*log(-2*log(3) + 2*log(2) + log(4*x^3 - 1) - 3*log(x))

________________________________________________________________________________________

Fricas [A]
time = 0.34, size = 33, normalized size = 1.65 \begin {gather*} \log \left (\log \left (\frac {4 \, {\left (4 \, x^{3} - 1\right )}}{9 \, x^{3}}\right )\right )^{2} + 6 \, \log \left (\log \left (\frac {4 \, {\left (4 \, x^{3} - 1\right )}}{9 \, x^{3}}\right )\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((6*log(log(1/9*(16*x^3-4)/x^3))+18)/(4*x^4-x)/log(1/9*(16*x^3-4)/x^3),x, algorithm="fricas")

[Out]

log(log(4/9*(4*x^3 - 1)/x^3))^2 + 6*log(log(4/9*(4*x^3 - 1)/x^3))

________________________________________________________________________________________

Sympy [A]
time = 0.11, size = 36, normalized size = 1.80 \begin {gather*} \log {\left (\log {\left (\frac {\frac {16 x^{3}}{9} - \frac {4}{9}}{x^{3}} \right )} \right )}^{2} + 6 \log {\left (\log {\left (\frac {\frac {16 x^{3}}{9} - \frac {4}{9}}{x^{3}} \right )} \right )} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((6*ln(ln(1/9*(16*x**3-4)/x**3))+18)/(4*x**4-x)/ln(1/9*(16*x**3-4)/x**3),x)

[Out]

log(log((16*x**3/9 - 4/9)/x**3))**2 + 6*log(log((16*x**3/9 - 4/9)/x**3))

________________________________________________________________________________________

Giac [B] Leaf count of result is larger than twice the leaf count of optimal. 77 vs. \(2 (18) = 36\).
time = 0.45, size = 77, normalized size = 3.85 \begin {gather*} -\log \left (-\log \left (9 \, x^{3}\right ) + \log \left (16 \, x^{3} - 4\right )\right )^{2} + 2 \, \log \left (-\log \left (9 \, x^{3}\right ) + \log \left (16 \, x^{3} - 4\right )\right ) \log \left (\log \left (\frac {4 \, {\left (4 \, x^{3} - 1\right )}}{9 \, x^{3}}\right )\right ) + 6 \, \log \left (-\log \left (9 \, x^{3}\right ) + \log \left (16 \, x^{3} - 4\right )\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((6*log(log(1/9*(16*x^3-4)/x^3))+18)/(4*x^4-x)/log(1/9*(16*x^3-4)/x^3),x, algorithm="giac")

[Out]

-log(-log(9*x^3) + log(16*x^3 - 4))^2 + 2*log(-log(9*x^3) + log(16*x^3 - 4))*log(log(4/9*(4*x^3 - 1)/x^3)) + 6
*log(-log(9*x^3) + log(16*x^3 - 4))

________________________________________________________________________________________

Mupad [B]
time = 4.52, size = 29, normalized size = 1.45 \begin {gather*} \ln \left (\ln \left (\frac {\frac {16\,x^3}{9}-\frac {4}{9}}{x^3}\right )\right )\,\left (\ln \left (\ln \left (\frac {\frac {16\,x^3}{9}-\frac {4}{9}}{x^3}\right )\right )+6\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(-(6*log(log(((16*x^3)/9 - 4/9)/x^3)) + 18)/(log(((16*x^3)/9 - 4/9)/x^3)*(x - 4*x^4)),x)

[Out]

log(log(((16*x^3)/9 - 4/9)/x^3))*(log(log(((16*x^3)/9 - 4/9)/x^3)) + 6)

________________________________________________________________________________________