3.30.63 \(\int \frac {2+x+e^4 x-x^2+x \log (\frac {16}{x^2})}{e^4 x-x^2+x \log (\frac {16}{x^2})} \, dx\)

Optimal. Leaf size=21 \[ -5+x-\log \left (-e^4+x-\log \left (\frac {16}{x^2}\right )\right ) \]

________________________________________________________________________________________

Rubi [A]  time = 0.16, antiderivative size = 18, normalized size of antiderivative = 0.86, number of steps used = 4, number of rules used = 3, integrand size = 43, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.070, Rules used = {6, 6742, 6684} \begin {gather*} x-\log \left (\log \left (\frac {16}{x^2}\right )-x+e^4\right ) \end {gather*}

Antiderivative was successfully verified.

[In]

Int[(2 + x + E^4*x - x^2 + x*Log[16/x^2])/(E^4*x - x^2 + x*Log[16/x^2]),x]

[Out]

x - Log[E^4 - x + Log[16/x^2]]

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 6684

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

Rule 6742

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

Rubi steps

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

________________________________________________________________________________________

Mathematica [A]  time = 0.14, size = 18, normalized size = 0.86 \begin {gather*} x-\log \left (e^4-x+\log \left (\frac {16}{x^2}\right )\right ) \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[(2 + x + E^4*x - x^2 + x*Log[16/x^2])/(E^4*x - x^2 + x*Log[16/x^2]),x]

[Out]

x - Log[E^4 - x + Log[16/x^2]]

________________________________________________________________________________________

fricas [A]  time = 0.67, size = 17, normalized size = 0.81 \begin {gather*} x - \log \left (-x + e^{4} + \log \left (\frac {16}{x^{2}}\right )\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

x - log(-x + e^4 + log(16/x^2))

________________________________________________________________________________________

giac [A]  time = 0.26, size = 19, normalized size = 0.90 \begin {gather*} x - \log \left (x - e^{4} - \log \left (\frac {16}{x^{2}}\right )\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

x - log(x - e^4 - log(16/x^2))

________________________________________________________________________________________

maple [A]  time = 0.15, size = 18, normalized size = 0.86

method	result	size
norman	\(x -\ln \left ({\mathrm e}^{4}+\ln \left (\frac {16}{x^{2}}\right )-x \right )\)	\(18\)
risch	\(x -\ln \left ({\mathrm e}^{4}+\ln \left (\frac {16}{x^{2}}\right )-x \right )\)	\(18\)

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

x-ln(exp(4)+ln(16/x^2)-x)

________________________________________________________________________________________

maxima [A]  time = 0.52, size = 19, normalized size = 0.90 \begin {gather*} x - \log \left (\frac {1}{2} \, x - \frac {1}{2} \, e^{4} - 2 \, \log \relax (2) + \log \relax (x)\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

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

[Out]

x - log(1/2*x - 1/2*e^4 - 2*log(2) + log(x))

________________________________________________________________________________________

mupad [B]  time = 1.83, size = 17, normalized size = 0.81 \begin {gather*} x-\ln \left (x-{\mathrm {e}}^4+\ln \left (\frac {x^2}{16}\right )\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((x + x*exp(4) + x*log(16/x^2) - x^2 + 2)/(x*exp(4) + x*log(16/x^2) - x^2),x)

[Out]

x - log(x - exp(4) + log(x^2/16))

________________________________________________________________________________________

sympy [A]  time = 0.13, size = 14, normalized size = 0.67 \begin {gather*} x - \log {\left (- x + \log {\left (\frac {16}{x^{2}} \right )} + e^{4} \right )} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((x*ln(16/x**2)+x*exp(4)-x**2+x+2)/(x*ln(16/x**2)+x*exp(4)-x**2),x)

[Out]

x - log(-x + log(16/x**2) + exp(4))

________________________________________________________________________________________