\(\int ((-512 x-512 x \log (2)) \log (x)+(768 x+768 x \log (2)) \log ^2(x)+(-384 x-384 x \log (2)) \log ^3(x)+(64 x+64 x \log (2)) \log ^4(x)) \, dx\) [7615]

   Optimal result
   Rubi [B] (verified)
   Mathematica [B] (verified)
   Maple [B] (verified)
   Fricas [B] (verification not implemented)
   Sympy [B] (verification not implemented)
   Maxima [B] (verification not implemented)
   Giac [B] (verification not implemented)
   Mupad [B] (verification not implemented)

Optimal result

Integrand size = 55, antiderivative size = 17 \[ \int \left ((-512 x-512 x \log (2)) \log (x)+(768 x+768 x \log (2)) \log ^2(x)+(-384 x-384 x \log (2)) \log ^3(x)+(64 x+64 x \log (2)) \log ^4(x)\right ) \, dx=2 x^2 (1+\log (2)) (-4+2 \log (x))^4 \]

[Out]

2*(1+ln(2))*x^2*(2*ln(x)-4)^4

Rubi [B] (verified)

Leaf count is larger than twice the leaf count of optimal. \(60\) vs. \(2(17)=34\).

Time = 0.06 (sec) , antiderivative size = 60, normalized size of antiderivative = 3.53, number of steps used = 19, number of rules used = 4, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.073, Rules used = {6, 12, 2341, 2342} \[ \int \left ((-512 x-512 x \log (2)) \log (x)+(768 x+768 x \log (2)) \log ^2(x)+(-384 x-384 x \log (2)) \log ^3(x)+(64 x+64 x \log (2)) \log ^4(x)\right ) \, dx=32 x^2 (1+\log (2)) \log ^4(x)-256 x^2 (1+\log (2)) \log ^3(x)+768 x^2 (1+\log (2)) \log ^2(x)-1024 x^2 (1+\log (2)) \log (x)+512 x^2 (1+\log (2)) \]

[In]

Int[(-512*x - 512*x*Log[2])*Log[x] + (768*x + 768*x*Log[2])*Log[x]^2 + (-384*x - 384*x*Log[2])*Log[x]^3 + (64*
x + 64*x*Log[2])*Log[x]^4,x]

[Out]

512*x^2*(1 + Log[2]) - 1024*x^2*(1 + Log[2])*Log[x] + 768*x^2*(1 + Log[2])*Log[x]^2 - 256*x^2*(1 + Log[2])*Log
[x]^3 + 32*x^2*(1 + Log[2])*Log[x]^4

Rule 6

Int[(u_.)*((w_.) + (a_.)*(v_) + (b_.)*(v_))^(p_.), x_Symbol] :> Int[u*((a + b)*v + w)^p, x] /; FreeQ[{a, b}, x
] &&  !FreeQ[v, x]

Rule 12

Int[(a_)*(u_), x_Symbol] :> Dist[a, Int[u, x], x] /; FreeQ[a, x] &&  !MatchQ[u, (b_)*(v_) /; FreeQ[b, x]]

Rule 2341

Int[((a_.) + Log[(c_.)*(x_)^(n_.)]*(b_.))*((d_.)*(x_))^(m_.), x_Symbol] :> Simp[(d*x)^(m + 1)*((a + b*Log[c*x^
n])/(d*(m + 1))), x] - Simp[b*n*((d*x)^(m + 1)/(d*(m + 1)^2)), x] /; FreeQ[{a, b, c, d, m, n}, x] && NeQ[m, -1
]

Rule 2342

Int[((a_.) + Log[(c_.)*(x_)^(n_.)]*(b_.))^(p_.)*((d_.)*(x_))^(m_.), x_Symbol] :> Simp[(d*x)^(m + 1)*((a + b*Lo
g[c*x^n])^p/(d*(m + 1))), x] - Dist[b*n*(p/(m + 1)), Int[(d*x)^m*(a + b*Log[c*x^n])^(p - 1), x], x] /; FreeQ[{
a, b, c, d, m, n}, x] && NeQ[m, -1] && GtQ[p, 0]

Rubi steps \begin{align*} \text {integral}& = \int (-512 x-512 x \log (2)) \log (x) \, dx+\int (768 x+768 x \log (2)) \log ^2(x) \, dx+\int (-384 x-384 x \log (2)) \log ^3(x) \, dx+\int (64 x+64 x \log (2)) \log ^4(x) \, dx \\ & = \int x (-512-512 \log (2)) \log (x) \, dx+\int x (768+768 \log (2)) \log ^2(x) \, dx+\int x (-384-384 \log (2)) \log ^3(x) \, dx+\int x (64+64 \log (2)) \log ^4(x) \, dx \\ & = (64 (1+\log (2))) \int x \log ^4(x) \, dx-(384 (1+\log (2))) \int x \log ^3(x) \, dx-(512 (1+\log (2))) \int x \log (x) \, dx+(768 (1+\log (2))) \int x \log ^2(x) \, dx \\ & = 128 x^2 (1+\log (2))-256 x^2 (1+\log (2)) \log (x)+384 x^2 (1+\log (2)) \log ^2(x)-192 x^2 (1+\log (2)) \log ^3(x)+32 x^2 (1+\log (2)) \log ^4(x)-(128 (1+\log (2))) \int x \log ^3(x) \, dx+(576 (1+\log (2))) \int x \log ^2(x) \, dx-(768 (1+\log (2))) \int x \log (x) \, dx \\ & = 320 x^2 (1+\log (2))-640 x^2 (1+\log (2)) \log (x)+672 x^2 (1+\log (2)) \log ^2(x)-256 x^2 (1+\log (2)) \log ^3(x)+32 x^2 (1+\log (2)) \log ^4(x)+(192 (1+\log (2))) \int x \log ^2(x) \, dx-(576 (1+\log (2))) \int x \log (x) \, dx \\ & = 464 x^2 (1+\log (2))-928 x^2 (1+\log (2)) \log (x)+768 x^2 (1+\log (2)) \log ^2(x)-256 x^2 (1+\log (2)) \log ^3(x)+32 x^2 (1+\log (2)) \log ^4(x)-(192 (1+\log (2))) \int x \log (x) \, dx \\ & = 512 x^2 (1+\log (2))-1024 x^2 (1+\log (2)) \log (x)+768 x^2 (1+\log (2)) \log ^2(x)-256 x^2 (1+\log (2)) \log ^3(x)+32 x^2 (1+\log (2)) \log ^4(x) \\ \end{align*}

Mathematica [B] (verified)

Leaf count is larger than twice the leaf count of optimal. \(48\) vs. \(2(17)=34\).

Time = 0.03 (sec) , antiderivative size = 48, normalized size of antiderivative = 2.82 \[ \int \left ((-512 x-512 x \log (2)) \log (x)+(768 x+768 x \log (2)) \log ^2(x)+(-384 x-384 x \log (2)) \log ^3(x)+(64 x+64 x \log (2)) \log ^4(x)\right ) \, dx=64 (1+\log (2)) \left (8 x^2-16 x^2 \log (x)+12 x^2 \log ^2(x)-4 x^2 \log ^3(x)+\frac {1}{2} x^2 \log ^4(x)\right ) \]

[In]

Integrate[(-512*x - 512*x*Log[2])*Log[x] + (768*x + 768*x*Log[2])*Log[x]^2 + (-384*x - 384*x*Log[2])*Log[x]^3
+ (64*x + 64*x*Log[2])*Log[x]^4,x]

[Out]

64*(1 + Log[2])*(8*x^2 - 16*x^2*Log[x] + 12*x^2*Log[x]^2 - 4*x^2*Log[x]^3 + (x^2*Log[x]^4)/2)

Maple [B] (verified)

Leaf count of result is larger than twice the leaf count of optimal. \(63\) vs. \(2(17)=34\).

Time = 0.06 (sec) , antiderivative size = 64, normalized size of antiderivative = 3.76

method result size
risch \(32 x^{2} \left (1+\ln \left (2\right )\right ) \ln \left (x \right )^{4}-256 x^{2} \left (1+\ln \left (2\right )\right ) \ln \left (x \right )^{3}+768 x^{2} \left (1+\ln \left (2\right )\right ) \ln \left (x \right )^{2}-1024 x^{2} \left (1+\ln \left (2\right )\right ) \ln \left (x \right )+512 x^{2} \ln \left (2\right )+512 x^{2}\) \(64\)
norman \(\left (512 \ln \left (2\right )+512\right ) x^{2}+\left (-1024-1024 \ln \left (2\right )\right ) x^{2} \ln \left (x \right )+\left (-256 \ln \left (2\right )-256\right ) x^{2} \ln \left (x \right )^{3}+\left (32 \ln \left (2\right )+32\right ) x^{2} \ln \left (x \right )^{4}+\left (768 \ln \left (2\right )+768\right ) x^{2} \ln \left (x \right )^{2}\) \(66\)
parallelrisch \(32 x^{2} \ln \left (x \right )^{4} \ln \left (2\right )+32 x^{2} \ln \left (x \right )^{4}-256 x^{2} \ln \left (x \right )^{3} \ln \left (2\right )-256 x^{2} \ln \left (x \right )^{3}+768 x^{2} \ln \left (2\right ) \ln \left (x \right )^{2}+768 x^{2} \ln \left (x \right )^{2}-1024 x^{2} \ln \left (2\right ) \ln \left (x \right )-1024 x^{2} \ln \left (x \right )+512 x^{2} \ln \left (2\right )+512 x^{2}\) \(90\)
default \(-1024 x^{2} \ln \left (x \right )+512 x^{2}-256 x^{2} \ln \left (2\right ) \ln \left (x \right )+128 x^{2} \ln \left (2\right )-256 x^{2} \ln \left (x \right )^{3}+768 x^{2} \ln \left (x \right )^{2}-384 \ln \left (2\right ) \left (\frac {x^{2} \ln \left (x \right )^{3}}{2}-\frac {3 x^{2} \ln \left (x \right )^{2}}{4}+\frac {3 x^{2} \ln \left (x \right )}{4}-\frac {3 x^{2}}{8}\right )+32 x^{2} \ln \left (x \right )^{4}+64 \ln \left (2\right ) \left (\frac {x^{2} \ln \left (x \right )^{4}}{2}-x^{2} \ln \left (x \right )^{3}+\frac {3 x^{2} \ln \left (x \right )^{2}}{2}-\frac {3 x^{2} \ln \left (x \right )}{2}+\frac {3 x^{2}}{4}\right )+768 \ln \left (2\right ) \left (\frac {x^{2} \ln \left (x \right )^{2}}{2}-\frac {x^{2} \ln \left (x \right )}{2}+\frac {x^{2}}{4}\right )\) \(162\)
parts \(-1024 x^{2} \ln \left (x \right )+512 x^{2}-256 x^{2} \ln \left (2\right ) \ln \left (x \right )+128 x^{2} \ln \left (2\right )-256 x^{2} \ln \left (x \right )^{3}+768 x^{2} \ln \left (x \right )^{2}-384 \ln \left (2\right ) \left (\frac {x^{2} \ln \left (x \right )^{3}}{2}-\frac {3 x^{2} \ln \left (x \right )^{2}}{4}+\frac {3 x^{2} \ln \left (x \right )}{4}-\frac {3 x^{2}}{8}\right )+32 x^{2} \ln \left (x \right )^{4}+64 \ln \left (2\right ) \left (\frac {x^{2} \ln \left (x \right )^{4}}{2}-x^{2} \ln \left (x \right )^{3}+\frac {3 x^{2} \ln \left (x \right )^{2}}{2}-\frac {3 x^{2} \ln \left (x \right )}{2}+\frac {3 x^{2}}{4}\right )+768 \ln \left (2\right ) \left (\frac {x^{2} \ln \left (x \right )^{2}}{2}-\frac {x^{2} \ln \left (x \right )}{2}+\frac {x^{2}}{4}\right )\) \(162\)

[In]

int((64*x*ln(2)+64*x)*ln(x)^4+(-384*x*ln(2)-384*x)*ln(x)^3+(768*x*ln(2)+768*x)*ln(x)^2+(-512*x*ln(2)-512*x)*ln
(x),x,method=_RETURNVERBOSE)

[Out]

32*x^2*(1+ln(2))*ln(x)^4-256*x^2*(1+ln(2))*ln(x)^3+768*x^2*(1+ln(2))*ln(x)^2-1024*x^2*(1+ln(2))*ln(x)+512*x^2*
ln(2)+512*x^2

Fricas [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 75 vs. \(2 (15) = 30\).

Time = 0.27 (sec) , antiderivative size = 75, normalized size of antiderivative = 4.41 \[ \int \left ((-512 x-512 x \log (2)) \log (x)+(768 x+768 x \log (2)) \log ^2(x)+(-384 x-384 x \log (2)) \log ^3(x)+(64 x+64 x \log (2)) \log ^4(x)\right ) \, dx=32 \, {\left (x^{2} \log \left (2\right ) + x^{2}\right )} \log \left (x\right )^{4} - 256 \, {\left (x^{2} \log \left (2\right ) + x^{2}\right )} \log \left (x\right )^{3} + 512 \, x^{2} \log \left (2\right ) + 768 \, {\left (x^{2} \log \left (2\right ) + x^{2}\right )} \log \left (x\right )^{2} + 512 \, x^{2} - 1024 \, {\left (x^{2} \log \left (2\right ) + x^{2}\right )} \log \left (x\right ) \]

[In]

integrate((64*x*log(2)+64*x)*log(x)^4+(-384*x*log(2)-384*x)*log(x)^3+(768*x*log(2)+768*x)*log(x)^2+(-512*x*log
(2)-512*x)*log(x),x, algorithm="fricas")

[Out]

32*(x^2*log(2) + x^2)*log(x)^4 - 256*(x^2*log(2) + x^2)*log(x)^3 + 512*x^2*log(2) + 768*(x^2*log(2) + x^2)*log
(x)^2 + 512*x^2 - 1024*(x^2*log(2) + x^2)*log(x)

Sympy [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 85 vs. \(2 (17) = 34\).

Time = 0.14 (sec) , antiderivative size = 85, normalized size of antiderivative = 5.00 \[ \int \left ((-512 x-512 x \log (2)) \log (x)+(768 x+768 x \log (2)) \log ^2(x)+(-384 x-384 x \log (2)) \log ^3(x)+(64 x+64 x \log (2)) \log ^4(x)\right ) \, dx=x^{2} \cdot \left (512 \log {\left (2 \right )} + 512\right ) + \left (- 1024 x^{2} - 1024 x^{2} \log {\left (2 \right )}\right ) \log {\left (x \right )} + \left (- 256 x^{2} - 256 x^{2} \log {\left (2 \right )}\right ) \log {\left (x \right )}^{3} + \left (32 x^{2} \log {\left (2 \right )} + 32 x^{2}\right ) \log {\left (x \right )}^{4} + \left (768 x^{2} \log {\left (2 \right )} + 768 x^{2}\right ) \log {\left (x \right )}^{2} \]

[In]

integrate((64*x*ln(2)+64*x)*ln(x)**4+(-384*x*ln(2)-384*x)*ln(x)**3+(768*x*ln(2)+768*x)*ln(x)**2+(-512*x*ln(2)-
512*x)*ln(x),x)

[Out]

x**2*(512*log(2) + 512) + (-1024*x**2 - 1024*x**2*log(2))*log(x) + (-256*x**2 - 256*x**2*log(2))*log(x)**3 + (
32*x**2*log(2) + 32*x**2)*log(x)**4 + (768*x**2*log(2) + 768*x**2)*log(x)**2

Maxima [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 139 vs. \(2 (15) = 30\).

Time = 0.29 (sec) , antiderivative size = 139, normalized size of antiderivative = 8.18 \[ \int \left ((-512 x-512 x \log (2)) \log (x)+(768 x+768 x \log (2)) \log ^2(x)+(-384 x-384 x \log (2)) \log ^3(x)+(64 x+64 x \log (2)) \log ^4(x)\right ) \, dx=16 \, {\left (2 \, {\left (\log \left (2\right ) + 1\right )} \log \left (x\right )^{4} - 4 \, {\left (\log \left (2\right ) + 1\right )} \log \left (x\right )^{3} + 6 \, {\left (\log \left (2\right ) + 1\right )} \log \left (x\right )^{2} - 6 \, {\left (\log \left (2\right ) + 1\right )} \log \left (x\right ) + 3 \, \log \left (2\right ) + 3\right )} x^{2} - 48 \, {\left (4 \, {\left (\log \left (2\right ) + 1\right )} \log \left (x\right )^{3} - 6 \, {\left (\log \left (2\right ) + 1\right )} \log \left (x\right )^{2} + 6 \, {\left (\log \left (2\right ) + 1\right )} \log \left (x\right ) - 3 \, \log \left (2\right ) - 3\right )} x^{2} + 192 \, {\left (2 \, {\left (\log \left (2\right ) + 1\right )} \log \left (x\right )^{2} - 2 \, {\left (\log \left (2\right ) + 1\right )} \log \left (x\right ) + \log \left (2\right ) + 1\right )} x^{2} + 128 \, x^{2} {\left (\log \left (2\right ) + 1\right )} - 256 \, {\left (x^{2} \log \left (2\right ) + x^{2}\right )} \log \left (x\right ) \]

[In]

integrate((64*x*log(2)+64*x)*log(x)^4+(-384*x*log(2)-384*x)*log(x)^3+(768*x*log(2)+768*x)*log(x)^2+(-512*x*log
(2)-512*x)*log(x),x, algorithm="maxima")

[Out]

16*(2*(log(2) + 1)*log(x)^4 - 4*(log(2) + 1)*log(x)^3 + 6*(log(2) + 1)*log(x)^2 - 6*(log(2) + 1)*log(x) + 3*lo
g(2) + 3)*x^2 - 48*(4*(log(2) + 1)*log(x)^3 - 6*(log(2) + 1)*log(x)^2 + 6*(log(2) + 1)*log(x) - 3*log(2) - 3)*
x^2 + 192*(2*(log(2) + 1)*log(x)^2 - 2*(log(2) + 1)*log(x) + log(2) + 1)*x^2 + 128*x^2*(log(2) + 1) - 256*(x^2
*log(2) + x^2)*log(x)

Giac [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 89 vs. \(2 (15) = 30\).

Time = 0.28 (sec) , antiderivative size = 89, normalized size of antiderivative = 5.24 \[ \int \left ((-512 x-512 x \log (2)) \log (x)+(768 x+768 x \log (2)) \log ^2(x)+(-384 x-384 x \log (2)) \log ^3(x)+(64 x+64 x \log (2)) \log ^4(x)\right ) \, dx=32 \, x^{2} \log \left (2\right ) \log \left (x\right )^{4} - 256 \, x^{2} \log \left (2\right ) \log \left (x\right )^{3} + 32 \, x^{2} \log \left (x\right )^{4} + 768 \, x^{2} \log \left (2\right ) \log \left (x\right )^{2} - 256 \, x^{2} \log \left (x\right )^{3} - 1024 \, x^{2} \log \left (2\right ) \log \left (x\right ) + 768 \, x^{2} \log \left (x\right )^{2} + 512 \, x^{2} \log \left (2\right ) - 1024 \, x^{2} \log \left (x\right ) + 512 \, x^{2} \]

[In]

integrate((64*x*log(2)+64*x)*log(x)^4+(-384*x*log(2)-384*x)*log(x)^3+(768*x*log(2)+768*x)*log(x)^2+(-512*x*log
(2)-512*x)*log(x),x, algorithm="giac")

[Out]

32*x^2*log(2)*log(x)^4 - 256*x^2*log(2)*log(x)^3 + 32*x^2*log(x)^4 + 768*x^2*log(2)*log(x)^2 - 256*x^2*log(x)^
3 - 1024*x^2*log(2)*log(x) + 768*x^2*log(x)^2 + 512*x^2*log(2) - 1024*x^2*log(x) + 512*x^2

Mupad [B] (verification not implemented)

Time = 12.74 (sec) , antiderivative size = 15, normalized size of antiderivative = 0.88 \[ \int \left ((-512 x-512 x \log (2)) \log (x)+(768 x+768 x \log (2)) \log ^2(x)+(-384 x-384 x \log (2)) \log ^3(x)+(64 x+64 x \log (2)) \log ^4(x)\right ) \, dx=32\,x^2\,{\left (\ln \left (x\right )-2\right )}^4\,\left (\ln \left (2\right )+1\right ) \]

[In]

int(log(x)^4*(64*x + 64*x*log(2)) - log(x)^3*(384*x + 384*x*log(2)) + log(x)^2*(768*x + 768*x*log(2)) - log(x)
*(512*x + 512*x*log(2)),x)

[Out]

32*x^2*(log(x) - 2)^4*(log(2) + 1)