\(\int \frac {-2+e^{x^2}-x+2 e^{x^2} x^2 \log (x)}{x} \, dx\) [484]

Optimal result

Integrand size = 26, antiderivative size = 16 \[ \int \frac {-2+e^{x^2}-x+2 e^{x^2} x^2 \log (x)}{x} \, dx=x+e^{x^2} \log (x)-2 (x+\log (x)) \]

[Out]

exp(x^2)*ln(x)-x-2*ln(x)

Rubi [A] (verified)

Time = 0.03 (sec) , antiderivative size = 16, normalized size of antiderivative = 1.00, number of steps used = 5, number of rules used = 3, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.115, Rules used = {14, 45, 2326} \[ \int \frac {-2+e^{x^2}-x+2 e^{x^2} x^2 \log (x)}{x} \, dx=e^{x^2} \log (x)-x-2 \log (x) \]

[In]

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

[Out]

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

Rule 14

Int[(u_)*((c_.)*(x_))^(m_.), x_Symbol] :> Int[ExpandIntegrand[(c*x)^m*u, x], x] /; FreeQ[{c, m}, x] && SumQ[u]
&&  !LinearQ[u, x] &&  !MatchQ[u, (a_) + (b_.)*(v_) /; FreeQ[{a, b}, x] && InverseFunctionQ[v]]

Rule 45

Int[((a_.) + (b_.)*(x_))^(m_.)*((c_.) + (d_.)*(x_))^(n_.), x_Symbol] :> Int[ExpandIntegrand[(a + b*x)^m*(c + d
*x)^n, x], x] /; FreeQ[{a, b, c, d, n}, x] && NeQ[b*c - a*d, 0] && IGtQ[m, 0] && ( !IntegerQ[n] || (EqQ[c, 0]
&& LeQ[7*m + 4*n + 4, 0]) || LtQ[9*m + 5*(n + 1), 0] || GtQ[m + n + 2, 0])

Rule 2326

Int[(y_.)*(F_)^(u_)*((v_) + (w_)), x_Symbol] :> With[{z = v*(y/(Log[F]*D[u, x]))}, Simp[F^u*z, x] /; EqQ[D[z,
x], w*y]] /; FreeQ[F, x]

Rubi steps \begin{align*} \text {integral}& = \int \left (\frac {-2-x}{x}+\frac {e^{x^2} \left (1+2 x^2 \log (x)\right )}{x}\right ) \, dx \\ & = \int \frac {-2-x}{x} \, dx+\int \frac {e^{x^2} \left (1+2 x^2 \log (x)\right )}{x} \, dx \\ & = e^{x^2} \log (x)+\int \left (-1-\frac {2}{x}\right ) \, dx \\ & = -x-2 \log (x)+e^{x^2} \log (x) \\ \end{align*}

Mathematica [A] (verified)

Time = 0.02 (sec) , antiderivative size = 16, normalized size of antiderivative = 1.00 \[ \int \frac {-2+e^{x^2}-x+2 e^{x^2} x^2 \log (x)}{x} \, dx=-x-2 \log (x)+e^{x^2} \log (x) \]

[In]

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

[Out]

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

Maple [A] (verified)

Time = 0.05 (sec) , antiderivative size = 16, normalized size of antiderivative = 1.00

method	result	size
default	\({\mathrm e}^{x^{2}} \ln \left (x \right )-x -2 \ln \left (x \right )\)	\(16\)
norman	\({\mathrm e}^{x^{2}} \ln \left (x \right )-x -2 \ln \left (x \right )\)	\(16\)
risch	\({\mathrm e}^{x^{2}} \ln \left (x \right )-x -2 \ln \left (x \right )\)	\(16\)
parallelrisch	\({\mathrm e}^{x^{2}} \ln \left (x \right )-x -2 \ln \left (x \right )\)	\(16\)
parts	\({\mathrm e}^{x^{2}} \ln \left (x \right )-x -2 \ln \left (x \right )\)	\(16\)

[In]

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

[Out]

exp(x^2)*ln(x)-x-2*ln(x)

Fricas [A] (verification not implemented)

none

Time = 0.26 (sec) , antiderivative size = 13, normalized size of antiderivative = 0.81 \[ \int \frac {-2+e^{x^2}-x+2 e^{x^2} x^2 \log (x)}{x} \, dx={\left (e^{\left (x^{2}\right )} - 2\right )} \log \left (x\right ) - x \]

[In]

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

[Out]

(e^(x^2) - 2)*log(x) - x

Sympy [A] (verification not implemented)

Time = 0.09 (sec) , antiderivative size = 14, normalized size of antiderivative = 0.88 \[ \int \frac {-2+e^{x^2}-x+2 e^{x^2} x^2 \log (x)}{x} \, dx=- x + e^{x^{2}} \log {\left (x \right )} - 2 \log {\left (x \right )} \]

[In]

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

[Out]

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

Maxima [A] (verification not implemented)

none

Time = 0.21 (sec) , antiderivative size = 15, normalized size of antiderivative = 0.94 \[ \int \frac {-2+e^{x^2}-x+2 e^{x^2} x^2 \log (x)}{x} \, dx=e^{\left (x^{2}\right )} \log \left (x\right ) - x - 2 \, \log \left (x\right ) \]

[In]

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

[Out]

e^(x^2)*log(x) - x - 2*log(x)

Giac [A] (verification not implemented)

none

Time = 0.27 (sec) , antiderivative size = 15, normalized size of antiderivative = 0.94 \[ \int \frac {-2+e^{x^2}-x+2 e^{x^2} x^2 \log (x)}{x} \, dx=e^{\left (x^{2}\right )} \log \left (x\right ) - x - 2 \, \log \left (x\right ) \]

[In]

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

[Out]

e^(x^2)*log(x) - x - 2*log(x)

Mupad [B] (verification not implemented)

Time = 7.58 (sec) , antiderivative size = 15, normalized size of antiderivative = 0.94 \[ \int \frac {-2+e^{x^2}-x+2 e^{x^2} x^2 \log (x)}{x} \, dx={\mathrm {e}}^{x^2}\,\ln \left (x\right )-2\,\ln \left (x\right )-x \]

[In]

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

[Out]

exp(x^2)*log(x) - 2*log(x) - x