\(\int \frac {e^{4 x} (-2+x)+1944 x^{14}+e^{2 x} (18 x^7-36 x^8)}{324 x^9} \, dx\) [463]

Optimal result

Integrand size = 39, antiderivative size = 18 \[ \int \frac {e^{4 x} (-2+x)+1944 x^{14}+e^{2 x} \left (18 x^7-36 x^8\right )}{324 x^9} \, dx=\left (-\frac {e^{2 x}}{36 x^4}+x^3\right )^2 \]

[Out]

(x^3-1/36*exp(x)^2/x^4)^2

Rubi [A] (verified)

Time = 0.05 (sec) , antiderivative size = 28, normalized size of antiderivative = 1.56, number of steps used = 5, number of rules used = 3, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.077, Rules used = {12, 14, 2228} \[ \int \frac {e^{4 x} (-2+x)+1944 x^{14}+e^{2 x} \left (18 x^7-36 x^8\right )}{324 x^9} \, dx=\frac {e^{4 x}}{1296 x^8}+x^6-\frac {e^{2 x}}{18 x} \]

[In]

Int[(E^(4*x)*(-2 + x) + 1944*x^14 + E^(2*x)*(18*x^7 - 36*x^8))/(324*x^9),x]

[Out]

E^(4*x)/(1296*x^8) - E^(2*x)/(18*x) + x^6

Rule 12

Int[(a_)*(u_), x_Symbol] :> Dist[a, Int[u, x], x] /; FreeQ[a, x] &&  !MatchQ[u, (b_)*(v_) /; FreeQ[b, 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 2228

Int[(F_)^((c_.)*(v_))*(u_)^(m_.)*(w_), x_Symbol] :> With[{b = Coefficient[v, x, 1], d = Coefficient[u, x, 0],
e = Coefficient[u, x, 1], f = Coefficient[w, x, 0], g = Coefficient[w, x, 1]}, Simp[g*u^(m + 1)*(F^(c*v)/(b*c*
e*Log[F])), x] /; EqQ[e*g*(m + 1) - b*c*(e*f - d*g)*Log[F], 0]] /; FreeQ[{F, c, m}, x] && LinearQ[{u, v, w}, x
]

Rubi steps \begin{align*} \text {integral}& = \frac {1}{324} \int \frac {e^{4 x} (-2+x)+1944 x^{14}+e^{2 x} \left (18 x^7-36 x^8\right )}{x^9} \, dx \\ & = \frac {1}{324} \int \left (\frac {e^{4 x} (-2+x)}{x^9}+1944 x^5-\frac {18 e^{2 x} (-1+2 x)}{x^2}\right ) \, dx \\ & = x^6+\frac {1}{324} \int \frac {e^{4 x} (-2+x)}{x^9} \, dx-\frac {1}{18} \int \frac {e^{2 x} (-1+2 x)}{x^2} \, dx \\ & = \frac {e^{4 x}}{1296 x^8}-\frac {e^{2 x}}{18 x}+x^6 \\ \end{align*}

Mathematica [A] (verified)

Time = 0.07 (sec) , antiderivative size = 28, normalized size of antiderivative = 1.56 \[ \int \frac {e^{4 x} (-2+x)+1944 x^{14}+e^{2 x} \left (18 x^7-36 x^8\right )}{324 x^9} \, dx=\frac {e^{4 x}}{1296 x^8}-\frac {e^{2 x}}{18 x}+x^6 \]

[In]

Integrate[(E^(4*x)*(-2 + x) + 1944*x^14 + E^(2*x)*(18*x^7 - 36*x^8))/(324*x^9),x]

[Out]

E^(4*x)/(1296*x^8) - E^(2*x)/(18*x) + x^6

Maple [A] (verified)

Time = 0.08 (sec) , antiderivative size = 23, normalized size of antiderivative = 1.28

method	result	size
default	\(x^{6}+\frac {{\mathrm e}^{4 x}}{1296 x^{8}}-\frac {{\mathrm e}^{2 x}}{18 x}\)	\(23\)
risch	\(x^{6}+\frac {{\mathrm e}^{4 x}}{1296 x^{8}}-\frac {{\mathrm e}^{2 x}}{18 x}\)	\(23\)
parts	\(x^{6}+\frac {{\mathrm e}^{4 x}}{1296 x^{8}}-\frac {{\mathrm e}^{2 x}}{18 x}\)	\(23\)
parallelrisch	\(\frac {1296 x^{14}-72 \,{\mathrm e}^{2 x} x^{7}+{\mathrm e}^{4 x}}{1296 x^{8}}\)	\(25\)

[In]

int(1/324*((-2+x)*exp(x)^4+(-36*x^8+18*x^7)*exp(x)^2+1944*x^14)/x^9,x,method=_RETURNVERBOSE)

[Out]

x^6+1/1296*exp(x)^4/x^8-1/18*exp(x)^2/x

Fricas [A] (verification not implemented)

none

Time = 0.24 (sec) , antiderivative size = 24, normalized size of antiderivative = 1.33 \[ \int \frac {e^{4 x} (-2+x)+1944 x^{14}+e^{2 x} \left (18 x^7-36 x^8\right )}{324 x^9} \, dx=\frac {1296 \, x^{14} - 72 \, x^{7} e^{\left (2 \, x\right )} + e^{\left (4 \, x\right )}}{1296 \, x^{8}} \]

[In]

integrate(1/324*((-2+x)*exp(x)^4+(-36*x^8+18*x^7)*exp(x)^2+1944*x^14)/x^9,x, algorithm="fricas")

[Out]

1/1296*(1296*x^14 - 72*x^7*e^(2*x) + e^(4*x))/x^8

Sympy [A] (verification not implemented)

Time = 0.06 (sec) , antiderivative size = 26, normalized size of antiderivative = 1.44 \[ \int \frac {e^{4 x} (-2+x)+1944 x^{14}+e^{2 x} \left (18 x^7-36 x^8\right )}{324 x^9} \, dx=x^{6} + \frac {- 1296 x^{8} e^{2 x} + 18 x e^{4 x}}{23328 x^{9}} \]

[In]

integrate(1/324*((-2+x)*exp(x)**4+(-36*x**8+18*x**7)*exp(x)**2+1944*x**14)/x**9,x)

[Out]

x**6 + (-1296*x**8*exp(2*x) + 18*x*exp(4*x))/(23328*x**9)

Maxima [C] (verification not implemented)

Result contains higher order function than in optimal. Order 4 vs. order 3.

Time = 0.22 (sec) , antiderivative size = 31, normalized size of antiderivative = 1.72 \[ \int \frac {e^{4 x} (-2+x)+1944 x^{14}+e^{2 x} \left (18 x^7-36 x^8\right )}{324 x^9} \, dx=x^{6} - \frac {1}{9} \, {\rm Ei}\left (2 \, x\right ) + \frac {1}{9} \, \Gamma \left (-1, -2 \, x\right ) + \frac {4096}{81} \, \Gamma \left (-7, -4 \, x\right ) + \frac {32768}{81} \, \Gamma \left (-8, -4 \, x\right ) \]

[In]

integrate(1/324*((-2+x)*exp(x)^4+(-36*x^8+18*x^7)*exp(x)^2+1944*x^14)/x^9,x, algorithm="maxima")

[Out]

x^6 - 1/9*Ei(2*x) + 1/9*gamma(-1, -2*x) + 4096/81*gamma(-7, -4*x) + 32768/81*gamma(-8, -4*x)

Giac [A] (verification not implemented)

none

Time = 0.27 (sec) , antiderivative size = 24, normalized size of antiderivative = 1.33 \[ \int \frac {e^{4 x} (-2+x)+1944 x^{14}+e^{2 x} \left (18 x^7-36 x^8\right )}{324 x^9} \, dx=\frac {1296 \, x^{14} - 72 \, x^{7} e^{\left (2 \, x\right )} + e^{\left (4 \, x\right )}}{1296 \, x^{8}} \]

[In]

integrate(1/324*((-2+x)*exp(x)^4+(-36*x^8+18*x^7)*exp(x)^2+1944*x^14)/x^9,x, algorithm="giac")

[Out]

1/1296*(1296*x^14 - 72*x^7*e^(2*x) + e^(4*x))/x^8

Mupad [B] (verification not implemented)

Time = 8.08 (sec) , antiderivative size = 17, normalized size of antiderivative = 0.94 \[ \int \frac {e^{4 x} (-2+x)+1944 x^{14}+e^{2 x} \left (18 x^7-36 x^8\right )}{324 x^9} \, dx=\frac {{\left ({\mathrm {e}}^{2\,x}-36\,x^7\right )}^2}{1296\,x^8} \]

[In]

int(((exp(2*x)*(18*x^7 - 36*x^8))/324 + (exp(4*x)*(x - 2))/324 + 6*x^14)/x^9,x)

[Out]

(exp(2*x) - 36*x^7)^2/(1296*x^8)