\(\int (-e^{21}+e^{4+x} (-15-15 x)+60 x-e^{21} \log (x)) \, dx\) [10314]

Optimal result

Integrand size = 27, antiderivative size = 23 \[ \int \left (-e^{21}+e^{4+x} (-15-15 x)+60 x-e^{21} \log (x)\right ) \, dx=x \left (15 \left (-e^{4+x}+2 x\right )-e^{21} \log (x)\right ) \]

[Out]

(30*x-15*exp(4+x)-exp(21)*ln(x))*x

Rubi [A] (verified)

Time = 0.01 (sec) , antiderivative size = 31, normalized size of antiderivative = 1.35, number of steps used = 4, number of rules used = 3, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.111, Rules used = {2207, 2225, 2332} \[ \int \left (-e^{21}+e^{4+x} (-15-15 x)+60 x-e^{21} \log (x)\right ) \, dx=30 x^2+15 e^{x+4}-15 e^{x+4} (x+1)-e^{21} x \log (x) \]

[In]

Int[-E^21 + E^(4 + x)*(-15 - 15*x) + 60*x - E^21*Log[x],x]

[Out]

15*E^(4 + x) + 30*x^2 - 15*E^(4 + x)*(1 + x) - E^21*x*Log[x]

Rule 2207

Int[((b_.)*(F_)^((g_.)*((e_.) + (f_.)*(x_))))^(n_.)*((c_.) + (d_.)*(x_))^(m_.), x_Symbol] :> Simp[(c + d*x)^m*
((b*F^(g*(e + f*x)))^n/(f*g*n*Log[F])), x] - Dist[d*(m/(f*g*n*Log[F])), Int[(c + d*x)^(m - 1)*(b*F^(g*(e + f*x
)))^n, x], x] /; FreeQ[{F, b, c, d, e, f, g, n}, x] && GtQ[m, 0] && IntegerQ[2*m] &&  !TrueQ[$UseGamma]

Rule 2225

Int[((F_)^((c_.)*((a_.) + (b_.)*(x_))))^(n_.), x_Symbol] :> Simp[(F^(c*(a + b*x)))^n/(b*c*n*Log[F]), x] /; Fre
eQ[{F, a, b, c, n}, x]

Rule 2332

Int[Log[(c_.)*(x_)^(n_.)], x_Symbol] :> Simp[x*Log[c*x^n], x] - Simp[n*x, x] /; FreeQ[{c, n}, x]

Rubi steps \begin{align*} \text {integral}& = -e^{21} x+30 x^2-e^{21} \int \log (x) \, dx+\int e^{4+x} (-15-15 x) \, dx \\ & = 30 x^2-15 e^{4+x} (1+x)-e^{21} x \log (x)+15 \int e^{4+x} \, dx \\ & = 15 e^{4+x}+30 x^2-15 e^{4+x} (1+x)-e^{21} x \log (x) \\ \end{align*}

Mathematica [A] (verified)

Time = 0.02 (sec) , antiderivative size = 22, normalized size of antiderivative = 0.96 \[ \int \left (-e^{21}+e^{4+x} (-15-15 x)+60 x-e^{21} \log (x)\right ) \, dx=-15 e^{4+x} x+30 x^2-e^{21} x \log (x) \]

[In]

Integrate[-E^21 + E^(4 + x)*(-15 - 15*x) + 60*x - E^21*Log[x],x]

[Out]

-15*E^(4 + x)*x + 30*x^2 - E^21*x*Log[x]

Maple [A] (verified)

Time = 0.04 (sec) , antiderivative size = 21, normalized size of antiderivative = 0.91

method	result	size
norman	\(30 x^{2}-15 x \,{\mathrm e}^{4+x}-x \,{\mathrm e}^{21} \ln \left (x \right )\)	\(21\)
risch	\(30 x^{2}-15 x \,{\mathrm e}^{4+x}-x \,{\mathrm e}^{21} \ln \left (x \right )\)	\(21\)
parallelrisch	\(30 x^{2}-15 x \,{\mathrm e}^{4+x}-x \,{\mathrm e}^{21} \ln \left (x \right )\)	\(21\)
default	\(-15 \,{\mathrm e}^{4+x} \left (4+x \right )+60 \,{\mathrm e}^{4+x}+30 x^{2}-{\mathrm e}^{21} \left (x \ln \left (x \right )-x \right )-x \,{\mathrm e}^{21}\)	\(39\)
parts	\(-15 \,{\mathrm e}^{4+x} \left (4+x \right )+60 \,{\mathrm e}^{4+x}+30 x^{2}-{\mathrm e}^{21} \left (x \ln \left (x \right )-x \right )-x \,{\mathrm e}^{21}\)	\(39\)

[In]

int(-exp(21)*ln(x)+(-15*x-15)*exp(4+x)-exp(21)+60*x,x,method=_RETURNVERBOSE)

[Out]

30*x^2-15*x*exp(4+x)-x*exp(21)*ln(x)

Fricas [A] (verification not implemented)

none

Time = 0.24 (sec) , antiderivative size = 20, normalized size of antiderivative = 0.87 \[ \int \left (-e^{21}+e^{4+x} (-15-15 x)+60 x-e^{21} \log (x)\right ) \, dx=-x e^{21} \log \left (x\right ) + 30 \, x^{2} - 15 \, x e^{\left (x + 4\right )} \]

[In]

integrate(-exp(21)*log(x)+(-15*x-15)*exp(4+x)-exp(21)+60*x,x, algorithm="fricas")

[Out]

-x*e^21*log(x) + 30*x^2 - 15*x*e^(x + 4)

Sympy [A] (verification not implemented)

Time = 0.09 (sec) , antiderivative size = 20, normalized size of antiderivative = 0.87 \[ \int \left (-e^{21}+e^{4+x} (-15-15 x)+60 x-e^{21} \log (x)\right ) \, dx=30 x^{2} - 15 x e^{x + 4} - x e^{21} \log {\left (x \right )} \]

[In]

integrate(-exp(21)*ln(x)+(-15*x-15)*exp(4+x)-exp(21)+60*x,x)

[Out]

30*x**2 - 15*x*exp(x + 4) - x*exp(21)*log(x)

Maxima [A] (verification not implemented)

none

Time = 0.19 (sec) , antiderivative size = 30, normalized size of antiderivative = 1.30 \[ \int \left (-e^{21}+e^{4+x} (-15-15 x)+60 x-e^{21} \log (x)\right ) \, dx=30 \, x^{2} - {\left (x \log \left (x\right ) - x\right )} e^{21} - x e^{21} - 15 \, x e^{\left (x + 4\right )} \]

[In]

integrate(-exp(21)*log(x)+(-15*x-15)*exp(4+x)-exp(21)+60*x,x, algorithm="maxima")

[Out]

30*x^2 - (x*log(x) - x)*e^21 - x*e^21 - 15*x*e^(x + 4)

Giac [A] (verification not implemented)

none

Time = 0.26 (sec) , antiderivative size = 30, normalized size of antiderivative = 1.30 \[ \int \left (-e^{21}+e^{4+x} (-15-15 x)+60 x-e^{21} \log (x)\right ) \, dx=30 \, x^{2} - {\left (x \log \left (x\right ) - x\right )} e^{21} - x e^{21} - 15 \, x e^{\left (x + 4\right )} \]

[In]

integrate(-exp(21)*log(x)+(-15*x-15)*exp(4+x)-exp(21)+60*x,x, algorithm="giac")

[Out]

30*x^2 - (x*log(x) - x)*e^21 - x*e^21 - 15*x*e^(x + 4)

Mupad [B] (verification not implemented)

Time = 16.43 (sec) , antiderivative size = 18, normalized size of antiderivative = 0.78 \[ \int \left (-e^{21}+e^{4+x} (-15-15 x)+60 x-e^{21} \log (x)\right ) \, dx=-x\,\left (15\,{\mathrm {e}}^{x+4}-30\,x+{\mathrm {e}}^{21}\,\ln \left (x\right )\right ) \]

[In]

int(60*x - exp(21) - exp(21)*log(x) - exp(x + 4)*(15*x + 15),x)

[Out]

-x*(15*exp(x + 4) - 30*x + exp(21)*log(x))