3.61.93 \(\int \frac {-1+e^2-3 x+(-1+e^2) \log (x)}{(-x+e^2 x-3 x^2) \log (x)} \, dx\) [6093]

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

[Out]

ln(ln(x)*x/(1+3*x-exp(2)))

________________________________________________________________________________________

Rubi [A]
time = 0.18, antiderivative size = 19, normalized size of antiderivative = 1.12, number of steps used = 9, number of rules used = 7, integrand size = 37, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.189, Rules used = {6, 1607, 6874, 36, 31, 29, 2339} \begin {gather*} \log (x)-\log \left (3 x-e^2+1\right )+\log (\log (x)) \end {gather*}

Antiderivative was successfully verified.

[In]

Int[(-1 + E^2 - 3*x + (-1 + E^2)*Log[x])/((-x + E^2*x - 3*x^2)*Log[x]),x]

[Out]

Log[x] - Log[1 - E^2 + 3*x] + Log[Log[x]]

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 29

Int[(x_)^(-1), x_Symbol] :> Simp[Log[x], x]

Rule 31

Int[((a_) + (b_.)*(x_))^(-1), x_Symbol] :> Simp[Log[RemoveContent[a + b*x, x]]/b, x] /; FreeQ[{a, b}, x]

Rule 36

Int[1/(((a_.) + (b_.)*(x_))*((c_.) + (d_.)*(x_))), x_Symbol] :> Dist[b/(b*c - a*d), Int[1/(a + b*x), x], x] -
Dist[d/(b*c - a*d), Int[1/(c + d*x), x], x] /; FreeQ[{a, b, c, d}, x] && NeQ[b*c - a*d, 0]

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 2339

Int[((a_.) + Log[(c_.)*(x_)^(n_.)]*(b_.))^(p_.)/(x_), x_Symbol] :> Dist[1/(b*n), Subst[Int[x^p, x], x, a + b*L
og[c*x^n]], x] /; FreeQ[{a, b, c, n, p}, x]

Rule 6874

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

Rubi steps

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

________________________________________________________________________________________

Mathematica [A]
time = 0.04, size = 19, normalized size = 1.12 \begin {gather*} \log (x)-\log \left (1-e^2+3 x\right )+\log (\log (x)) \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[(-1 + E^2 - 3*x + (-1 + E^2)*Log[x])/((-x + E^2*x - 3*x^2)*Log[x]),x]

[Out]

Log[x] - Log[1 - E^2 + 3*x] + Log[Log[x]]

________________________________________________________________________________________

Maple [B] Leaf count of result is larger than twice the leaf count of optimal. \(62\) vs. \(2(16)=32\).
time = 0.62, size = 63, normalized size = 3.71

method	result	size
norman	\(\ln \left (x \right )-\ln \left ({\mathrm e}^{2}-1-3 x \right )+\ln \left (\ln \left (x \right )\right )\)	\(17\)
risch	\(-\ln \left (1+3 x -{\mathrm e}^{2}\right )+\ln \left (x \right )+\ln \left (\ln \left (x \right )\right )\)	\(19\)
default	\(\ln \left (\ln \left (x \right )\right )-\frac {{\mathrm e}^{2} \ln \left (1+3 x -{\mathrm e}^{2}\right )}{{\mathrm e}^{2}-1}+\frac {{\mathrm e}^{2} \ln \left (x \right )}{{\mathrm e}^{2}-1}+\frac {\ln \left (1+3 x -{\mathrm e}^{2}\right )}{{\mathrm e}^{2}-1}-\frac {\ln \left (x \right )}{{\mathrm e}^{2}-1}\)	\(63\)

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

ln(ln(x))-exp(2)/(exp(2)-1)*ln(1+3*x-exp(2))+exp(2)/(exp(2)-1)*ln(x)+1/(exp(2)-1)*ln(1+3*x-exp(2))-1/(exp(2)-1
)*ln(x)

________________________________________________________________________________________

Maxima [A]
time = 0.29, size = 18, normalized size = 1.06 \begin {gather*} -\log \left (3 \, x - e^{2} + 1\right ) + \log \left (x\right ) + \log \left (\log \left (x\right )\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(((exp(2)-1)*log(x)+exp(2)-3*x-1)/(exp(2)*x-3*x^2-x)/log(x),x, algorithm="maxima")

[Out]

-log(3*x - e^2 + 1) + log(x) + log(log(x))

________________________________________________________________________________________

Fricas [A]
time = 0.46, size = 18, normalized size = 1.06 \begin {gather*} -\log \left (3 \, x - e^{2} + 1\right ) + \log \left (x\right ) + \log \left (\log \left (x\right )\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(((exp(2)-1)*log(x)+exp(2)-3*x-1)/(exp(2)*x-3*x^2-x)/log(x),x, algorithm="fricas")

[Out]

-log(3*x - e^2 + 1) + log(x) + log(log(x))

________________________________________________________________________________________

Sympy [B] Leaf count of result is larger than twice the leaf count of optimal. 141 vs. \(2 (14) = 28\).
time = 0.19, size = 141, normalized size = 8.29 \begin {gather*} \left (1 - e^{2}\right ) \left (\frac {\log {\left (x - \frac {e^{4}}{6 \left (-1 + e\right ) \left (1 + e\right )} - \frac {e^{2}}{6} - \frac {1}{6 \left (-1 + e\right ) \left (1 + e\right )} + \frac {1}{6} + \frac {e^{2}}{3 \left (-1 + e\right ) \left (1 + e\right )} \right )}}{\left (-1 + e\right ) \left (1 + e\right )} - \frac {\log {\left (x - \frac {e^{2}}{6} - \frac {e^{2}}{3 \left (-1 + e\right ) \left (1 + e\right )} + \frac {1}{6 \left (-1 + e\right ) \left (1 + e\right )} + \frac {1}{6} + \frac {e^{4}}{6 \left (-1 + e\right ) \left (1 + e\right )} \right )}}{\left (-1 + e\right ) \left (1 + e\right )}\right ) + \log {\left (\log {\left (x \right )} \right )} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

(1 - exp(2))*(log(x - exp(4)/(6*(-1 + E)*(1 + E)) - exp(2)/6 - 1/(6*(-1 + E)*(1 + E)) + 1/6 + exp(2)/(3*(-1 +
E)*(1 + E)))/((-1 + E)*(1 + E)) - log(x - exp(2)/6 - exp(2)/(3*(-1 + E)*(1 + E)) + 1/(6*(-1 + E)*(1 + E)) + 1/
6 + exp(4)/(6*(-1 + E)*(1 + E)))/((-1 + E)*(1 + E))) + log(log(x))

________________________________________________________________________________________

Giac [A]
time = 0.39, size = 18, normalized size = 1.06 \begin {gather*} -\log \left (3 \, x - e^{2} + 1\right ) + \log \left (x\right ) + \log \left (\log \left (x\right )\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(((exp(2)-1)*log(x)+exp(2)-3*x-1)/(exp(2)*x-3*x^2-x)/log(x),x, algorithm="giac")

[Out]

-log(3*x - e^2 + 1) + log(x) + log(log(x))

________________________________________________________________________________________

Mupad [B]
time = 4.56, size = 18, normalized size = 1.06 \begin {gather*} \ln \left (\ln \left (x\right )\right )-\ln \left (3\,x-{\mathrm {e}}^2+1\right )+\ln \left (x\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((3*x - exp(2) - log(x)*(exp(2) - 1) + 1)/(log(x)*(x - x*exp(2) + 3*x^2)),x)

[Out]

log(log(x)) - log(3*x - exp(2) + 1) + log(x)

________________________________________________________________________________________