\(\int \frac {e^{x^2} (1+4 x-2 x^2)+(63-36 x+9 x^2) \log (4)}{(36-36 x+9 x^2) \log (4)} \, dx\) [2145]

Optimal result

Integrand size = 47, antiderivative size = 26 \[ \int \frac {e^{x^2} \left (1+4 x-2 x^2\right )+\left (63-36 x+9 x^2\right ) \log (4)}{\left (36-36 x+9 x^2\right ) \log (4)} \, dx=5+x-\frac {1+x+\frac {e^{x^2}}{9 \log (4)}}{-2+x} \]

[Out]

x-(1/18*exp(x^2)/ln(2)+x+1)/(-2+x)+5

Rubi [A] (verified)

Time = 0.12 (sec) , antiderivative size = 43, normalized size of antiderivative = 1.65, number of steps used = 8, number of rules used = 5, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.106, Rules used = {12, 27, 6874, 2326, 697} \[ \int \frac {e^{x^2} \left (1+4 x-2 x^2\right )+\left (63-36 x+9 x^2\right ) \log (4)}{\left (36-36 x+9 x^2\right ) \log (4)} \, dx=\frac {e^{x^2} \left (2 x-x^2\right )}{9 (2-x)^2 x \log (4)}+x+\frac {3}{2-x} \]

[In]

Int[(E^x^2*(1 + 4*x - 2*x^2) + (63 - 36*x + 9*x^2)*Log[4])/((36 - 36*x + 9*x^2)*Log[4]),x]

[Out]

3/(2 - x) + x + (E^x^2*(2*x - x^2))/(9*(2 - x)^2*x*Log[4])

Rule 12

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

Rule 27

Int[(u_.)*((a_) + (b_.)*(x_) + (c_.)*(x_)^2)^(p_.), x_Symbol] :> Int[u*Cancel[(b/2 + c*x)^(2*p)/c^p], x] /; Fr
eeQ[{a, b, c}, x] && EqQ[b^2 - 4*a*c, 0] && IntegerQ[p]

Rule 697

Int[((d_.) + (e_.)*(x_))^(m_)*((a_.) + (b_.)*(x_) + (c_.)*(x_)^2)^(p_.), x_Symbol] :> Int[ExpandIntegrand[(d +
e*x)^m*(a + b*x + c*x^2)^p, x], x] /; FreeQ[{a, b, c, d, e, m}, x] && NeQ[b^2 - 4*a*c, 0] && EqQ[2*c*d - b*e,
0] && IGtQ[p, 0] &&  !(EqQ[m, 3] && NeQ[p, 1])

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]

Rule 6874

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

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

Mathematica [A] (verified)

Time = 0.08 (sec) , antiderivative size = 33, normalized size of antiderivative = 1.27 \[ \int \frac {e^{x^2} \left (1+4 x-2 x^2\right )+\left (63-36 x+9 x^2\right ) \log (4)}{\left (36-36 x+9 x^2\right ) \log (4)} \, dx=\frac {-e^{x^2}+9 \left (-3-2 x+x^2\right ) \log (4)}{9 (-2+x) \log (4)} \]

[In]

Integrate[(E^x^2*(1 + 4*x - 2*x^2) + (63 - 36*x + 9*x^2)*Log[4])/((36 - 36*x + 9*x^2)*Log[4]),x]

[Out]

(-E^x^2 + 9*(-3 - 2*x + x^2)*Log[4])/(9*(-2 + x)*Log[4])

Maple [A] (verified)

Time = 0.43 (sec) , antiderivative size = 22, normalized size of antiderivative = 0.85

method	result	size
norman	\(\frac {x^{2}-\frac {{\mathrm e}^{x^{2}}}{18 \ln \left (2\right )}-7}{-2+x}\)	\(22\)
risch	\(x -\frac {3}{-2+x}-\frac {{\mathrm e}^{x^{2}}}{18 \ln \left (2\right ) \left (-2+x \right )}\)	\(25\)
parts	\(x -\frac {3}{-2+x}-\frac {{\mathrm e}^{x^{2}}}{18 \ln \left (2\right ) \left (-2+x \right )}\)	\(25\)
parallelrisch	\(\frac {18 x^{2} \ln \left (2\right )-{\mathrm e}^{x^{2}}-126 \ln \left (2\right )}{18 \ln \left (2\right ) \left (-2+x \right )}\)	\(30\)

[In]

int(1/2*((-2*x^2+4*x+1)*exp(x^2)+2*(9*x^2-36*x+63)*ln(2))/(9*x^2-36*x+36)/ln(2),x,method=_RETURNVERBOSE)

[Out]

(x^2-1/18*exp(x^2)/ln(2)-7)/(-2+x)

Fricas [A] (verification not implemented)

none

Time = 0.28 (sec) , antiderivative size = 30, normalized size of antiderivative = 1.15 \[ \int \frac {e^{x^2} \left (1+4 x-2 x^2\right )+\left (63-36 x+9 x^2\right ) \log (4)}{\left (36-36 x+9 x^2\right ) \log (4)} \, dx=\frac {18 \, {\left (x^{2} - 2 \, x - 3\right )} \log \left (2\right ) - e^{\left (x^{2}\right )}}{18 \, {\left (x - 2\right )} \log \left (2\right )} \]

[In]

integrate(1/2*((-2*x^2+4*x+1)*exp(x^2)+2*(9*x^2-36*x+63)*log(2))/(9*x^2-36*x+36)/log(2),x, algorithm="fricas")

[Out]

1/18*(18*(x^2 - 2*x - 3)*log(2) - e^(x^2))/((x - 2)*log(2))

Sympy [A] (verification not implemented)

Time = 0.09 (sec) , antiderivative size = 22, normalized size of antiderivative = 0.85 \[ \int \frac {e^{x^2} \left (1+4 x-2 x^2\right )+\left (63-36 x+9 x^2\right ) \log (4)}{\left (36-36 x+9 x^2\right ) \log (4)} \, dx=x - \frac {e^{x^{2}}}{18 x \log {\left (2 \right )} - 36 \log {\left (2 \right )}} - \frac {3}{x - 2} \]

[In]

integrate(1/2*((-2*x**2+4*x+1)*exp(x**2)+2*(9*x**2-36*x+63)*ln(2))/(9*x**2-36*x+36)/ln(2),x)

[Out]

x - exp(x**2)/(18*x*log(2) - 36*log(2)) - 3/(x - 2)

Maxima [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 64 vs. \(2 (24) = 48\).

Time = 0.23 (sec) , antiderivative size = 64, normalized size of antiderivative = 2.46 \[ \int \frac {e^{x^2} \left (1+4 x-2 x^2\right )+\left (63-36 x+9 x^2\right ) \log (4)}{\left (36-36 x+9 x^2\right ) \log (4)} \, dx=\frac {18 \, {\left (x - \frac {4}{x - 2} + 4 \, \log \left (x - 2\right )\right )} \log \left (2\right ) + 72 \, {\left (\frac {2}{x - 2} - \log \left (x - 2\right )\right )} \log \left (2\right ) - \frac {e^{\left (x^{2}\right )}}{x - 2} - \frac {126 \, \log \left (2\right )}{x - 2}}{18 \, \log \left (2\right )} \]

[In]

integrate(1/2*((-2*x^2+4*x+1)*exp(x^2)+2*(9*x^2-36*x+63)*log(2))/(9*x^2-36*x+36)/log(2),x, algorithm="maxima")

[Out]

1/18*(18*(x - 4/(x - 2) + 4*log(x - 2))*log(2) + 72*(2/(x - 2) - log(x - 2))*log(2) - e^(x^2)/(x - 2) - 126*lo
g(2)/(x - 2))/log(2)

Giac [A] (verification not implemented)

none

Time = 0.26 (sec) , antiderivative size = 34, normalized size of antiderivative = 1.31 \[ \int \frac {e^{x^2} \left (1+4 x-2 x^2\right )+\left (63-36 x+9 x^2\right ) \log (4)}{\left (36-36 x+9 x^2\right ) \log (4)} \, dx=\frac {18 \, x^{2} \log \left (2\right ) - 36 \, x \log \left (2\right ) - e^{\left (x^{2}\right )} - 54 \, \log \left (2\right )}{18 \, {\left (x - 2\right )} \log \left (2\right )} \]

[In]

integrate(1/2*((-2*x^2+4*x+1)*exp(x^2)+2*(9*x^2-36*x+63)*log(2))/(9*x^2-36*x+36)/log(2),x, algorithm="giac")

[Out]

1/18*(18*x^2*log(2) - 36*x*log(2) - e^(x^2) - 54*log(2))/((x - 2)*log(2))

Mupad [B] (verification not implemented)

Time = 0.26 (sec) , antiderivative size = 22, normalized size of antiderivative = 0.85 \[ \int \frac {e^{x^2} \left (1+4 x-2 x^2\right )+\left (63-36 x+9 x^2\right ) \log (4)}{\left (36-36 x+9 x^2\right ) \log (4)} \, dx=x-\frac {\frac {{\mathrm {e}}^{x^2}}{18}+\ln \left (8\right )}{\ln \left (2\right )\,\left (x-2\right )} \]

[In]

int(((exp(x^2)*(4*x - 2*x^2 + 1))/2 + log(2)*(9*x^2 - 36*x + 63))/(log(2)*(9*x^2 - 36*x + 36)),x)

[Out]

x - (exp(x^2)/18 + log(8))/(log(2)*(x - 2))