3.3.92 \(\int \frac {1-\log (x)}{x (x+\log (x))} \, dx\) [292]

Optimal. Leaf size=9 \[ \log \left (1+\frac {\log (x)}{x}\right ) \]

[Out]

ln(1+ln(x)/x)

________________________________________________________________________________________

Rubi [A]
time = 0.05, antiderivative size = 9, normalized size of antiderivative = 1.00, number of steps used = 2, number of rules used = 2, integrand size = 16, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.125, Rules used = {6844, 31} \begin {gather*} \log \left (\frac {\log (x)}{x}+1\right ) \end {gather*}

Antiderivative was successfully verified.

[In]

Int[(1 - Log[x])/(x*(x + Log[x])),x]

[Out]

Log[1 + 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 6844

Int[(u_)*(v_)^(r_.)*((a_.)*(v_)^(p_.) + (b_.)*(w_)^(q_.))^(m_.), x_Symbol] :> With[{c = Simplify[u/(p*w*D[v, x
] - q*v*D[w, x])]}, Dist[(-c)*q, Subst[Int[(a + b*x^q)^m, x], x, v^(m*p + r + 1)*w], x] /; FreeQ[c, x]] /; Fre
eQ[{a, b, m, p, q, r}, x] && EqQ[p + q*(m*p + r + 1), 0] && IntegerQ[q] && IntegerQ[m]

Rubi steps

\begin {align*} \int \frac {1-\log (x)}{x (x+\log (x))} \, dx &=\text {Subst}\left (\int \frac {1}{1+x} \, dx,x,\frac {\log (x)}{x}\right )\\ &=\log \left (1+\frac {\log (x)}{x}\right )\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]
time = 0.02, size = 10, normalized size = 1.11 \begin {gather*} -\log (x)+\log (x+\log (x)) \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[(1 - Log[x])/(x*(x + Log[x])),x]

[Out]

-Log[x] + Log[x + Log[x]]

________________________________________________________________________________________

Maple [A]
time = 0.08, size = 11, normalized size = 1.22

method	result	size
default	\(-\ln \left (x \right )+\ln \left (x +\ln \left (x \right )\right )\)	\(11\)
norman	\(-\ln \left (x \right )+\ln \left (x +\ln \left (x \right )\right )\)	\(11\)
risch	\(-\ln \left (x \right )+\ln \left (x +\ln \left (x \right )\right )\)	\(11\)

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((1-ln(x))/x/(x+ln(x)),x,method=_RETURNVERBOSE)

[Out]

-ln(x)+ln(x+ln(x))

________________________________________________________________________________________

Maxima [A]
time = 0.30, size = 10, normalized size = 1.11 \begin {gather*} \log \left (x + \log \left (x\right )\right ) - \log \left (x\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((1-log(x))/x/(x+log(x)),x, algorithm="maxima")

[Out]

log(x + log(x)) - log(x)

________________________________________________________________________________________

Fricas [A]
time = 0.37, size = 10, normalized size = 1.11 \begin {gather*} \log \left (x + \log \left (x\right )\right ) - \log \left (x\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((1-log(x))/x/(x+log(x)),x, algorithm="fricas")

[Out]

log(x + log(x)) - log(x)

________________________________________________________________________________________

Sympy [A]
time = 0.10, size = 8, normalized size = 0.89 \begin {gather*} - \log {\left (x \right )} + \log {\left (x + \log {\left (x \right )} \right )} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((1-ln(x))/x/(x+ln(x)),x)

[Out]

-log(x) + log(x + log(x))

________________________________________________________________________________________

Giac [A]
time = 4.59, size = 14, normalized size = 1.56 \begin {gather*} -\log \left (x\right ) + \log \left (-x - \log \left (x\right )\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((1-log(x))/x/(x+log(x)),x, algorithm="giac")

[Out]

-log(x) + log(-x - log(x))

________________________________________________________________________________________

Mupad [B]
time = 0.37, size = 10, normalized size = 1.11 \begin {gather*} \ln \left (x+\ln \left (x\right )\right )-\ln \left (x\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(-(log(x) - 1)/(x*(x + log(x))),x)

[Out]

log(x + log(x)) - log(x)

________________________________________________________________________________________