Integrand size = 106, antiderivative size = 27 \[ \int \frac {\left (1-32 x+256 x^2\right ) \log ^2(x)+e^{\frac {-16 x^3+\left (-64 x-16 x^2\right ) \log (x)}{(-1+16 x) \log (x)}} \left (-16 x^2+256 x^3+\left (48 x^2-512 x^3\right ) \log (x)+\left (64+32 x-256 x^2\right ) \log ^2(x)\right )}{\left (1-32 x+256 x^2\right ) \log ^2(x)} \, dx=e^{\frac {4+x+\frac {x^2}{\log (x)}}{-1+\frac {1}{16 x}}}+x \]
Time = 4.42 (sec) , antiderivative size = 38, normalized size of antiderivative = 1.41 \[ \int \frac {\left (1-32 x+256 x^2\right ) \log ^2(x)+e^{\frac {-16 x^3+\left (-64 x-16 x^2\right ) \log (x)}{(-1+16 x) \log (x)}} \left (-16 x^2+256 x^3+\left (48 x^2-512 x^3\right ) \log (x)+\left (64+32 x-256 x^2\right ) \log ^2(x)\right )}{\left (1-32 x+256 x^2\right ) \log ^2(x)} \, dx=e^{-\frac {65}{16}-x-\frac {65}{16 (-1+16 x)}-\frac {16 x^3}{(-1+16 x) \log (x)}}+x \]
Integrate[((1 - 32*x + 256*x^2)*Log[x]^2 + E^((-16*x^3 + (-64*x - 16*x^2)* Log[x])/((-1 + 16*x)*Log[x]))*(-16*x^2 + 256*x^3 + (48*x^2 - 512*x^3)*Log[ x] + (64 + 32*x - 256*x^2)*Log[x]^2))/((1 - 32*x + 256*x^2)*Log[x]^2),x]
Below are the steps used by Rubi to obtain the solution. The rule number used for the transformation is given above next to the arrow. The rules definitions used are listed below.
\(\displaystyle \int \frac {\left (256 x^3-16 x^2+\left (-256 x^2+32 x+64\right ) \log ^2(x)+\left (48 x^2-512 x^3\right ) \log (x)\right ) \exp \left (\frac {\left (-16 x^2-64 x\right ) \log (x)-16 x^3}{(16 x-1) \log (x)}\right )+\left (256 x^2-32 x+1\right ) \log ^2(x)}{\left (256 x^2-32 x+1\right ) \log ^2(x)} \, dx\) |
\(\Big \downarrow \) 7277 |
\(\displaystyle 1024 \int \frac {\left (256 x^2-32 x+1\right ) \log ^2(x)-16 e^{\frac {16 x^3}{(1-16 x) \log (x)}} x^{\frac {16 x^2+64 x}{(1-16 x) \log (x)}} \left (-16 x^3+x^2-2 \left (-8 x^2+x+2\right ) \log ^2(x)-\left (3 x^2-32 x^3\right ) \log (x)\right )}{1024 (1-16 x)^2 \log ^2(x)}dx\) |
\(\Big \downarrow \) 27 |
\(\displaystyle \int \frac {\left (256 x^2-32 x+1\right ) \log ^2(x)-16 e^{\frac {16 x^3}{(1-16 x) \log (x)}} x^{\frac {16 \left (x^2+4 x\right )}{(1-16 x) \log (x)}} \left (-16 x^3+x^2-2 \left (-8 x^2+x+2\right ) \log ^2(x)-\left (3 x^2-32 x^3\right ) \log (x)\right )}{(1-16 x)^2 \log ^2(x)}dx\) |
\(\Big \downarrow \) 7293 |
\(\displaystyle \int \left (\frac {16 \left (16 x^3-32 x^3 \log (x)-x^2-16 x^2 \log ^2(x)+3 x^2 \log (x)+2 x \log ^2(x)+4 \log ^2(x)\right ) \exp \left (-\frac {16 x \left (x^2+x \log (x)+4 \log (x)\right )}{(16 x-1) \log (x)}\right )}{(1-16 x)^2 \log ^2(x)}+1\right )dx\) |
\(\Big \downarrow \) 2009 |
\(\displaystyle \frac {1}{16} \int \frac {\exp \left (-\frac {16 x \left (x^2+\log (x) x+4 \log (x)\right )}{(16 x-1) \log (x)}\right )}{\log ^2(x)}dx+\int \frac {\exp \left (-\frac {16 x \left (x^2+\log (x) x+4 \log (x)\right )}{(16 x-1) \log (x)}\right ) x}{\log ^2(x)}dx+\frac {1}{16} \int \frac {\exp \left (-\frac {16 x \left (x^2+\log (x) x+4 \log (x)\right )}{(16 x-1) \log (x)}\right )}{(16 x-1) \log ^2(x)}dx-\int \exp \left (-\frac {16 x \left (x^2+\log (x) x+4 \log (x)\right )}{(16 x-1) \log (x)}\right )dx+65 \int \frac {\exp \left (-\frac {16 x \left (x^2+\log (x) x+4 \log (x)\right )}{(16 x-1) \log (x)}\right )}{(16 x-1)^2}dx-\frac {1}{16} \int \frac {\exp \left (-\frac {16 x \left (x^2+\log (x) x+4 \log (x)\right )}{(16 x-1) \log (x)}\right )}{\log (x)}dx-2 \int \frac {\exp \left (-\frac {16 x \left (x^2+\log (x) x+4 \log (x)\right )}{(16 x-1) \log (x)}\right ) x}{\log (x)}dx+\frac {1}{16} \int \frac {\exp \left (-\frac {16 x \left (x^2+\log (x) x+4 \log (x)\right )}{(16 x-1) \log (x)}\right )}{(16 x-1)^2 \log (x)}dx+x\) |
Int[((1 - 32*x + 256*x^2)*Log[x]^2 + E^((-16*x^3 + (-64*x - 16*x^2)*Log[x] )/((-1 + 16*x)*Log[x]))*(-16*x^2 + 256*x^3 + (48*x^2 - 512*x^3)*Log[x] + ( 64 + 32*x - 256*x^2)*Log[x]^2))/((1 - 32*x + 256*x^2)*Log[x]^2),x]
3.19.2.3.1 Defintions of rubi rules used
Int[(a_)*(Fx_), x_Symbol] :> Simp[a Int[Fx, x], x] /; FreeQ[a, x] && !Ma tchQ[Fx, (b_)*(Gx_) /; FreeQ[b, x]]
Int[(u_)*((a_.) + (b_.)*(x_)^(n_.) + (c_.)*(x_)^(n2_.))^(p_.), x_Symbol] :> Simp[1/(4^p*c^p) Int[u*(b + 2*c*x^n)^(2*p), x], x] /; FreeQ[{a, b, c, n} , x] && EqQ[n2, 2*n] && EqQ[b^2 - 4*a*c, 0] && IntegerQ[p] && !AlgebraicFu nctionQ[u, x]
Time = 0.65 (sec) , antiderivative size = 30, normalized size of antiderivative = 1.11
method | result | size |
risch | \(x +{\mathrm e}^{-\frac {16 x \left (x \ln \left (x \right )+x^{2}+4 \ln \left (x \right )\right )}{\left (16 x -1\right ) \ln \left (x \right )}}\) | \(30\) |
parallelrisch | \(x +{\mathrm e}^{\frac {\left (-16 x^{2}-64 x \right ) \ln \left (x \right )-16 x^{3}}{\left (16 x -1\right ) \ln \left (x \right )}}+\frac {3}{32}\) | \(35\) |
int((((-256*x^2+32*x+64)*ln(x)^2+(-512*x^3+48*x^2)*ln(x)+256*x^3-16*x^2)*e xp(((-16*x^2-64*x)*ln(x)-16*x^3)/(16*x-1)/ln(x))+(256*x^2-32*x+1)*ln(x)^2) /(256*x^2-32*x+1)/ln(x)^2,x,method=_RETURNVERBOSE)
Time = 0.25 (sec) , antiderivative size = 30, normalized size of antiderivative = 1.11 \[ \int \frac {\left (1-32 x+256 x^2\right ) \log ^2(x)+e^{\frac {-16 x^3+\left (-64 x-16 x^2\right ) \log (x)}{(-1+16 x) \log (x)}} \left (-16 x^2+256 x^3+\left (48 x^2-512 x^3\right ) \log (x)+\left (64+32 x-256 x^2\right ) \log ^2(x)\right )}{\left (1-32 x+256 x^2\right ) \log ^2(x)} \, dx=x + e^{\left (-\frac {16 \, {\left (x^{3} + {\left (x^{2} + 4 \, x\right )} \log \left (x\right )\right )}}{{\left (16 \, x - 1\right )} \log \left (x\right )}\right )} \]
integrate((((-256*x^2+32*x+64)*log(x)^2+(-512*x^3+48*x^2)*log(x)+256*x^3-1 6*x^2)*exp(((-16*x^2-64*x)*log(x)-16*x^3)/(16*x-1)/log(x))+(256*x^2-32*x+1 )*log(x)^2)/(256*x^2-32*x+1)/log(x)^2,x, algorithm=\
Time = 0.22 (sec) , antiderivative size = 29, normalized size of antiderivative = 1.07 \[ \int \frac {\left (1-32 x+256 x^2\right ) \log ^2(x)+e^{\frac {-16 x^3+\left (-64 x-16 x^2\right ) \log (x)}{(-1+16 x) \log (x)}} \left (-16 x^2+256 x^3+\left (48 x^2-512 x^3\right ) \log (x)+\left (64+32 x-256 x^2\right ) \log ^2(x)\right )}{\left (1-32 x+256 x^2\right ) \log ^2(x)} \, dx=x + e^{\frac {- 16 x^{3} + \left (- 16 x^{2} - 64 x\right ) \log {\left (x \right )}}{\left (16 x - 1\right ) \log {\left (x \right )}}} \]
integrate((((-256*x**2+32*x+64)*ln(x)**2+(-512*x**3+48*x**2)*ln(x)+256*x** 3-16*x**2)*exp(((-16*x**2-64*x)*ln(x)-16*x**3)/(16*x-1)/ln(x))+(256*x**2-3 2*x+1)*ln(x)**2)/(256*x**2-32*x+1)/ln(x)**2,x)
Leaf count of result is larger than twice the leaf count of optimal. 89 vs. \(2 (23) = 46\).
Time = 0.36 (sec) , antiderivative size = 89, normalized size of antiderivative = 3.30 \[ \int \frac {\left (1-32 x+256 x^2\right ) \log ^2(x)+e^{\frac {-16 x^3+\left (-64 x-16 x^2\right ) \log (x)}{(-1+16 x) \log (x)}} \left (-16 x^2+256 x^3+\left (48 x^2-512 x^3\right ) \log (x)+\left (64+32 x-256 x^2\right ) \log ^2(x)\right )}{\left (1-32 x+256 x^2\right ) \log ^2(x)} \, dx={\left (x e^{\left (x + \frac {x^{2}}{\log \left (x\right )} + \frac {x}{16 \, \log \left (x\right )} + \frac {65}{16 \, {\left (16 \, x - 1\right )}} + \frac {1}{256 \, \log \left (x\right )} + \frac {65}{16}\right )} + e^{\left (-\frac {1}{256 \, {\left (16 \, x - 1\right )} \log \left (x\right )}\right )}\right )} e^{\left (-x - \frac {x^{2}}{\log \left (x\right )} - \frac {x}{16 \, \log \left (x\right )} - \frac {65}{16 \, {\left (16 \, x - 1\right )}} - \frac {1}{256 \, \log \left (x\right )} - \frac {65}{16}\right )} \]
integrate((((-256*x^2+32*x+64)*log(x)^2+(-512*x^3+48*x^2)*log(x)+256*x^3-1 6*x^2)*exp(((-16*x^2-64*x)*log(x)-16*x^3)/(16*x-1)/log(x))+(256*x^2-32*x+1 )*log(x)^2)/(256*x^2-32*x+1)/log(x)^2,x, algorithm=\
(x*e^(x + x^2/log(x) + 1/16*x/log(x) + 65/16/(16*x - 1) + 1/256/log(x) + 6 5/16) + e^(-1/256/((16*x - 1)*log(x))))*e^(-x - x^2/log(x) - 1/16*x/log(x) - 65/16/(16*x - 1) - 1/256/log(x) - 65/16)
Time = 0.60 (sec) , antiderivative size = 32, normalized size of antiderivative = 1.19 \[ \int \frac {\left (1-32 x+256 x^2\right ) \log ^2(x)+e^{\frac {-16 x^3+\left (-64 x-16 x^2\right ) \log (x)}{(-1+16 x) \log (x)}} \left (-16 x^2+256 x^3+\left (48 x^2-512 x^3\right ) \log (x)+\left (64+32 x-256 x^2\right ) \log ^2(x)\right )}{\left (1-32 x+256 x^2\right ) \log ^2(x)} \, dx=x + e^{\left (-\frac {16 \, {\left (x^{3} + x^{2} \log \left (x\right ) + 4 \, x \log \left (x\right )\right )}}{16 \, x \log \left (x\right ) - \log \left (x\right )}\right )} \]
integrate((((-256*x^2+32*x+64)*log(x)^2+(-512*x^3+48*x^2)*log(x)+256*x^3-1 6*x^2)*exp(((-16*x^2-64*x)*log(x)-16*x^3)/(16*x-1)/log(x))+(256*x^2-32*x+1 )*log(x)^2)/(256*x^2-32*x+1)/log(x)^2,x, algorithm=\
Time = 13.51 (sec) , antiderivative size = 53, normalized size of antiderivative = 1.96 \[ \int \frac {\left (1-32 x+256 x^2\right ) \log ^2(x)+e^{\frac {-16 x^3+\left (-64 x-16 x^2\right ) \log (x)}{(-1+16 x) \log (x)}} \left (-16 x^2+256 x^3+\left (48 x^2-512 x^3\right ) \log (x)+\left (64+32 x-256 x^2\right ) \log ^2(x)\right )}{\left (1-32 x+256 x^2\right ) \log ^2(x)} \, dx=x+{\mathrm {e}}^{\frac {64\,x\,\ln \left (x\right )}{\ln \left (x\right )-16\,x\,\ln \left (x\right )}}\,{\mathrm {e}}^{\frac {16\,x^2\,\ln \left (x\right )}{\ln \left (x\right )-16\,x\,\ln \left (x\right )}}\,{\mathrm {e}}^{\frac {16\,x^3}{\ln \left (x\right )-16\,x\,\ln \left (x\right )}} \]
int((log(x)^2*(256*x^2 - 32*x + 1) + exp(-(log(x)*(64*x + 16*x^2) + 16*x^3 )/(log(x)*(16*x - 1)))*(log(x)^2*(32*x - 256*x^2 + 64) + log(x)*(48*x^2 - 512*x^3) - 16*x^2 + 256*x^3))/(log(x)^2*(256*x^2 - 32*x + 1)),x)