∫ (1−x) log(5)___________________ −4x−4x2+4x log(3x 4 )+(−4x−4x2+4x log(3x 4 )) log(1+x−log(3x 4 )) dx

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

________________________________________________________________________________________

Rubi [A] time = 0.16, antiderivative size = 21, normalized size of antiderivative = 0.78, number of steps used = 4, number of rules used = 3, integrand size = 59, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.051, Rules used = {12, 6688, 6684} \begin {gather*} \frac {1}{4} \log (5) \log \left (\log \left (x-\log \left (\frac {3 x}{4}\right )+1\right )+1\right ) \end {gather*}

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

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

Int[(u_)/(y_), x_Symbol] :> With[{q = DerivativeDivides[y, u, x]}, Simp[q*Log[RemoveContent[y, x]], x] /; !Fa

Int[u_, x_Symbol] :> With[{v = SimplifyIntegrand[u, x]}, Int[v, x] /; SimplerIntegrandQ[v, u, x]]

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

________________________________________________________________________________________

Mathematica [A] time = 0.24, size = 21, normalized size = 0.78 \begin {gather*} \frac {1}{4} \log (5) \log \left (1+\log \left (1+x-\log \left (\frac {3 x}{4}\right )\right )\right ) \end {gather*}

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

________________________________________________________________________________________

fricas [A] time = 0.62, size = 17, normalized size = 0.63 \begin {gather*} \frac {1}{4} \, \log \relax (5) \log \left (\log \left (x - \log \left (\frac {3}{4} \, x\right ) + 1\right ) + 1\right ) \end {gather*}

integrate((-x+1)*log(5)/((4*x*log(3/4*x)-4*x^2-4*x)*log(-log(3/4*x)+x+1)+4*x*log(3/4*x)-4*x^2-4*x),x, algorith

________________________________________________________________________________________

giac [F] time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \int \frac {{\left (x - 1\right )} \log \relax (5)}{4 \, {\left (x^{2} - x \log \left (\frac {3}{4} \, x\right ) + {\left (x^{2} - x \log \left (\frac {3}{4} \, x\right ) + x\right )} \log \left (x - \log \left (\frac {3}{4} \, x\right ) + 1\right ) + x\right )}}\,{d x} \end {gather*}

integrate((-x+1)*log(5)/((4*x*log(3/4*x)-4*x^2-4*x)*log(-log(3/4*x)+x+1)+4*x*log(3/4*x)-4*x^2-4*x),x, algorith

integrate(1/4*(x - 1)*log(5)/(x^2 - x*log(3/4*x) + (x^2 - x*log(3/4*x) + x)*log(x - log(3/4*x) + 1) + x), x)

________________________________________________________________________________________


method	result	size

norman	\(\frac {\ln \relax (5) \ln \left (\ln \left (-\ln \left (\frac {3 x}{4}\right )+x +1\right )+1\right )}{4}\)	\(18\)
risch	\(\frac {\ln \relax (5) \ln \left (\ln \left (-\ln \left (\frac {3 x}{4}\right )+x +1\right )+1\right )}{4}\)	\(18\)

int((1-x)*ln(5)/((4*x*ln(3/4*x)-4*x^2-4*x)*ln(-ln(3/4*x)+x+1)+4*x*ln(3/4*x)-4*x^2-4*x),x,method=_RETURNVERBOSE

________________________________________________________________________________________

maxima [A] time = 0.47, size = 23, normalized size = 0.85 \begin {gather*} \frac {1}{4} \, \log \relax (5) \log \left (\log \left (x - \log \relax (3) + 2 \, \log \relax (2) - \log \relax (x) + 1\right ) + 1\right ) \end {gather*}

integrate((-x+1)*log(5)/((4*x*log(3/4*x)-4*x^2-4*x)*log(-log(3/4*x)+x+1)+4*x*log(3/4*x)-4*x^2-4*x),x, algorith

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

________________________________________________________________________________________

mupad [B] time = 3.56, size = 17, normalized size = 0.63 \begin {gather*} \frac {\ln \relax (5)\,\ln \left (\ln \left (x-\ln \left (\frac {3\,x}{4}\right )+1\right )+1\right )}{4} \end {gather*}

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

________________________________________________________________________________________

sympy [A] time = 0.51, size = 19, normalized size = 0.70 \begin {gather*} \frac {\log {\relax (5 )} \log {\left (\log {\left (x - \log {\left (\frac {3 x}{4} \right )} + 1 \right )} + 1 \right )}}{4} \end {gather*}

integrate((-x+1)*ln(5)/((4*x*ln(3/4*x)-4*x**2-4*x)*ln(-ln(3/4*x)+x+1)+4*x*ln(3/4*x)-4*x**2-4*x),x)

________________________________________________________________________________________

3.43.44 \(\int \frac {(1-x) \log (5)}{-4 x-4 x^2+4 x \log (\frac {3 x}{4})+(-4 x-4 x^2+4 x \log (\frac {3 x}{4})) \log (1+x-\log (\frac {3 x}{4}))} \, dx\)