3.2.59 \(\int e^x x^{20} \, dx\) [159]

Optimal. Leaf size=163 \[ 2432902008176640000 e^x-2432902008176640000 e^x x+1216451004088320000 e^x x^2-405483668029440000 e^x x^3+101370917007360000 e^x x^4-20274183401472000 e^x x^5+3379030566912000 e^x x^6-482718652416000 e^x x^7+60339831552000 e^x x^8-6704425728000 e^x x^9+670442572800 e^x x^{10}-60949324800 e^x x^{11}[phone] e^x x^{12}-390700800 e^x x^{13}[phone] e^x x^{14}-1860480 e^x x^{15}+116280 e^x x^{16}-6840 e^x x^{17}+380 e^x x^{18}-20 e^x x^{19}+e^x x^{20} \]

[Out]

2432902008176640000*exp(x)-2432902008176640000*exp(x)*x+1216451004088320000*exp(x)*x^2-405483668029440000*exp(
x)*x^3+101370917007360000*exp(x)*x^4-20274183401472000*exp(x)*x^5+3379030566912000*exp(x)*x^6-482718652416000*
exp(x)*x^7+60339831552000*exp(x)*x^8-6704425728000*exp(x)*x^9+670442572800*exp(x)*x^10-60949324800*exp(x)*x^11
[phone]*exp(x)*x^12-390700800*exp(x)*x^13+27907200*exp(x)*x^14-1860480*exp(x)*x^15+116280*exp(x)*x^16-6840
*exp(x)*x^17+380*exp(x)*x^18-20*exp(x)*x^19+exp(x)*x^20

________________________________________________________________________________________

Rubi [A]
time = 0.17, antiderivative size = 163, normalized size of antiderivative = 1.00, number of steps used = 21, number of rules used = 2, integrand size = 7, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.286, Rules used = {2207, 2225} \begin {gather*} e^x x^{20}-20 e^x x^{19}+380 e^x x^{18}-6840 e^x x^{17}+116280 e^x x^{16}-1860480 e^x x^{15}[phone] e^x x^{14}-390700800 e^x x^{13}[phone] e^x x^{12}-60949324800 e^x x^{11}[phone] e^x x^{10}-6704425728000 e^x x^9+60339831552000 e^x x^8-482718652416000 e^x x^7+3379030566912000 e^x x^6-20274183401472000 e^x x^5+101370917007360000 e^x x^4-405483668029440000 e^x x^3+1216451004088320000 e^x x^2-2432902008176640000 e^x x+2432902008176640000 e^x \end {gather*}

Antiderivative was successfully verified.

[In]

Int[E^x*x^20,x]

[Out]

2432902008176640000*E^x - 2432902008176640000*E^x*x + 1216451004088320000*E^x*x^2 - 405483668029440000*E^x*x^3
+ 101370917007360000*E^x*x^4 - 20274183401472000*E^x*x^5 + 3379030566912000*E^x*x^6 - 482718652416000*E^x*x^7
+ 60339831552000*E^x*x^8 - 6704425728000*E^x*x^9 + 670442572800*E^x*x^10 - 60949324800*E^x*x^11 + 5079110400*
E^x*x^12 - 390700800*E^x*x^13 + 27907200*E^x*x^14 - 1860480*E^x*x^15 + 116280*E^x*x^16 - 6840*E^x*x^17 + 380*E
^x*x^18 - 20*E^x*x^19 + E^x*x^20

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]

Rubi steps

\begin {align*} \int e^x x^{20} \, dx &=e^x x^{20}-20 \int e^x x^{19} \, dx\\ &=-20 e^x x^{19}+e^x x^{20}+380 \int e^x x^{18} \, dx\\ &=380 e^x x^{18}-20 e^x x^{19}+e^x x^{20}-6840 \int e^x x^{17} \, dx\\ &=-6840 e^x x^{17}+380 e^x x^{18}-20 e^x x^{19}+e^x x^{20}+116280 \int e^x x^{16} \, dx\\ &=116280 e^x x^{16}-6840 e^x x^{17}+380 e^x x^{18}-20 e^x x^{19}+e^x x^{20}-1860480 \int e^x x^{15} \, dx\\ &=-1860480 e^x x^{15}+116280 e^x x^{16}-6840 e^x x^{17}+380 e^x x^{18}-20 e^x x^{19}+e^x x^{20}[phone] \int e^x x^{14} \, dx\\ &=27907200 e^x x^{14}-1860480 e^x x^{15}+116280 e^x x^{16}-6840 e^x x^{17}+380 e^x x^{18}-20 e^x x^{19}+e^x x^{20}-390700800 \int e^x x^{13} \, dx\\ &=-390700800 e^x x^{13}[phone] e^x x^{14}-1860480 e^x x^{15}+116280 e^x x^{16}-6840 e^x x^{17}+380 e^x x^{18}-20 e^x x^{19}+e^x x^{20}[phone] \int e^x x^{12} \, dx\\ &=5079110400 e^x x^{12}-390700800 e^x x^{13}[phone] e^x x^{14}-1860480 e^x x^{15}+116280 e^x x^{16}-6840 e^x x^{17}+380 e^x x^{18}-20 e^x x^{19}+e^x x^{20}-60949324800 \int e^x x^{11} \, dx\\ &=-60949324800 e^x x^{11}[phone] e^x x^{12}-390700800 e^x x^{13}[phone] e^x x^{14}-1860480 e^x x^{15}+116280 e^x x^{16}-6840 e^x x^{17}+380 e^x x^{18}-20 e^x x^{19}+e^x x^{20}[phone] \int e^x x^{10} \, dx\\ &=670442572800 e^x x^{10}-60949324800 e^x x^{11}[phone] e^x x^{12}-390700800 e^x x^{13}[phone] e^x x^{14}-1860480 e^x x^{15}+116280 e^x x^{16}-6840 e^x x^{17}+380 e^x x^{18}-20 e^x x^{19}+e^x x^{20}-6704425728000 \int e^x x^9 \, dx\\ &=-6704425728000 e^x x^9+670442572800 e^x x^{10}-60949324800 e^x x^{11}[phone] e^x x^{12}-390700800 e^x x^{13}[phone] e^x x^{14}-1860480 e^x x^{15}+116280 e^x x^{16}-6840 e^x x^{17}+380 e^x x^{18}-20 e^x x^{19}+e^x x^{20}[phone] \int e^x x^8 \, dx\\ &=60339831552000 e^x x^8-6704425728000 e^x x^9+670442572800 e^x x^{10}-60949324800 e^x x^{11}[phone] e^x x^{12}-390700800 e^x x^{13}[phone] e^x x^{14}-1860480 e^x x^{15}+116280 e^x x^{16}-6840 e^x x^{17}+380 e^x x^{18}-20 e^x x^{19}+e^x x^{20}-482718652416000 \int e^x x^7 \, dx\\ &=-482718652416000 e^x x^7+60339831552000 e^x x^8-6704425728000 e^x x^9+670442572800 e^x x^{10}-60949324800 e^x x^{11}[phone] e^x x^{12}-390700800 e^x x^{13}[phone] e^x x^{14}-1860480 e^x x^{15}+116280 e^x x^{16}-6840 e^x x^{17}+380 e^x x^{18}-20 e^x x^{19}+e^x x^{20}+3379030566912000 \int e^x x^6 \, dx\\ &=3379030566912000 e^x x^6-482718652416000 e^x x^7+60339831552000 e^x x^8-6704425728000 e^x x^9+670442572800 e^x x^{10}-60949324800 e^x x^{11}[phone] e^x x^{12}-390700800 e^x x^{13}[phone] e^x x^{14}-1860480 e^x x^{15}+116280 e^x x^{16}-6840 e^x x^{17}+380 e^x x^{18}-20 e^x x^{19}+e^x x^{20}-20274183401472000 \int e^x x^5 \, dx\\ &=-20274183401472000 e^x x^5+3379030566912000 e^x x^6-482718652416000 e^x x^7+60339831552000 e^x x^8-6704425728000 e^x x^9+670442572800 e^x x^{10}-60949324800 e^x x^{11}[phone] e^x x^{12}-390700800 e^x x^{13}[phone] e^x x^{14}-1860480 e^x x^{15}+116280 e^x x^{16}-6840 e^x x^{17}+380 e^x x^{18}-20 e^x x^{19}+e^x x^{20}+101370917007360000 \int e^x x^4 \, dx\\ &=101370917007360000 e^x x^4-20274183401472000 e^x x^5+3379030566912000 e^x x^6-482718652416000 e^x x^7+60339831552000 e^x x^8-6704425728000 e^x x^9+670442572800 e^x x^{10}-60949324800 e^x x^{11}[phone] e^x x^{12}-390700800 e^x x^{13}[phone] e^x x^{14}-1860480 e^x x^{15}+116280 e^x x^{16}-6840 e^x x^{17}+380 e^x x^{18}-20 e^x x^{19}+e^x x^{20}-405483668029440000 \int e^x x^3 \, dx\\ &=-405483668029440000 e^x x^3+101370917007360000 e^x x^4-20274183401472000 e^x x^5+3379030566912000 e^x x^6-482718652416000 e^x x^7+60339831552000 e^x x^8-6704425728000 e^x x^9+670442572800 e^x x^{10}-60949324800 e^x x^{11}[phone] e^x x^{12}-390700800 e^x x^{13}[phone] e^x x^{14}-1860480 e^x x^{15}+116280 e^x x^{16}-6840 e^x x^{17}+380 e^x x^{18}-20 e^x x^{19}+e^x x^{20}+1216451004088320000 \int e^x x^2 \, dx\\ &=1216451004088320000 e^x x^2-405483668029440000 e^x x^3+101370917007360000 e^x x^4-20274183401472000 e^x x^5+3379030566912000 e^x x^6-482718652416000 e^x x^7+60339831552000 e^x x^8-6704425728000 e^x x^9+670442572800 e^x x^{10}-60949324800 e^x x^{11}[phone] e^x x^{12}-390700800 e^x x^{13}[phone] e^x x^{14}-1860480 e^x x^{15}+116280 e^x x^{16}-6840 e^x x^{17}+380 e^x x^{18}-20 e^x x^{19}+e^x x^{20}-2432902008176640000 \int e^x x \, dx\\ &=-2432902008176640000 e^x x+1216451004088320000 e^x x^2-405483668029440000 e^x x^3+101370917007360000 e^x x^4-20274183401472000 e^x x^5+3379030566912000 e^x x^6-482718652416000 e^x x^7+60339831552000 e^x x^8-6704425728000 e^x x^9+670442572800 e^x x^{10}-60949324800 e^x x^{11}[phone] e^x x^{12}-390700800 e^x x^{13}[phone] e^x x^{14}-1860480 e^x x^{15}+116280 e^x x^{16}-6840 e^x x^{17}+380 e^x x^{18}-20 e^x x^{19}+e^x x^{20}+2432902008176640000 \int e^x \, dx\\ &=2432902008176640000 e^x-2432902008176640000 e^x x+1216451004088320000 e^x x^2-405483668029440000 e^x x^3+101370917007360000 e^x x^4-20274183401472000 e^x x^5+3379030566912000 e^x x^6-482718652416000 e^x x^7+60339831552000 e^x x^8-6704425728000 e^x x^9+670442572800 e^x x^{10}-60949324800 e^x x^{11}[phone] e^x x^{12}-390700800 e^x x^{13}[phone] e^x x^{14}-1860480 e^x x^{15}+116280 e^x x^{16}-6840 e^x x^{17}+380 e^x x^{18}-20 e^x x^{19}+e^x x^{20}\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]
time = 0.07, size = 102, normalized size = 0.63 \begin {gather*} e^x \left (2432902008176640000-2432902008176640000 x+1216451004088320000 x^2-405483668029440000 x^3+101370917007360000 x^4-20274183401472000 x^5+3379030566912000 x^6-482718652416000 x^7+60339831552000 x^8-6704425728000 x^9+670442572800 x^{10}-60949324800 x^{11}[phone] x^{12}-390700800 x^{13}[phone] x^{14}-1860480 x^{15}+116280 x^{16}-6840 x^{17}+380 x^{18}-20 x^{19}+x^{20}\right ) \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[E^x*x^20,x]

[Out]

E^x*(2432902008176640000 - 2432902008176640000*x + 1216451004088320000*x^2 - 405483668029440000*x^3 + 10137091
7007360000*x^4 - 20274183401472000*x^5 + 3379030566912000*x^6 - 482718652416000*x^7 + 60339831552000*x^8 - 670
4425728000*x^9 + 670442572800*x^10 - 60949324800*x^11 + 5079110400*x^12 - 390700800*x^13 + 27907200*x^14 - 186
0480*x^15 + 116280*x^16 - 6840*x^17 + 380*x^18 - 20*x^19 + x^20)

________________________________________________________________________________________

Maple [A]
time = 0.04, size = 143, normalized size = 0.88

method	result	size
gosper	\(\left (x^{20}-20 x^{19}+380 x^{18}-6840 x^{17}+116280 x^{16}-1860480 x^{15}[phone] x^{14}-390700800 x^{13}[phone] x^{12}-60949324800 x^{11}[phone] x^{10}-6704425728000 x^{9}[phone] x^{8}-482718652416000 x^{7}+3379030566912000 x^{6}-20274183401472000 x^{5}+101370917007360000 x^{4}-405483668029440000 x^{3}+1216451004088320000 x^{2}-2432902008176640000 x +2432902008176640000\right ) {\mathrm e}^{x}\)	\(102\)
risch	\(\left (x^{20}-20 x^{19}+380 x^{18}-6840 x^{17}+116280 x^{16}-1860480 x^{15}[phone] x^{14}-390700800 x^{13}[phone] x^{12}-60949324800 x^{11}[phone] x^{10}-6704425728000 x^{9}[phone] x^{8}-482718652416000 x^{7}+3379030566912000 x^{6}-20274183401472000 x^{5}+101370917007360000 x^{4}-405483668029440000 x^{3}+1216451004088320000 x^{2}-2432902008176640000 x +2432902008176640000\right ) {\mathrm e}^{x}\)	\(102\)
meijerg	\(-2432902008176640000+\frac {\left (21 x^{20}-420 x^{19}+7980 x^{18}-143640 x^{17}+2441880 x^{16}-39070080 x^{15}[phone] x^{14}-8204716800 x^{13}[phone] x^{12}-1279935820800 x^{11}[phone] x^{10}-140792940288000 x^{9}+1267136462592000 x^{8}-10137091700736000 x^{7}+70959641905152000 x^{6}-425757851430912000 x^{5}+2128789257154560000 x^{4}-8515157028618240000 x^{3}+25545471085854720000 x^{2}-51090942171709440000 x +51090942171709440000\right ) {\mathrm e}^{x}}{21}\)	\(107\)
default	\(2432902008176640000 \,{\mathrm e}^{x}-2432902008176640000 \,{\mathrm e}^{x} x +1216451004088320000 \,{\mathrm e}^{x} x^{2}-405483668029440000 \,{\mathrm e}^{x} x^{3}+101370917007360000 \,{\mathrm e}^{x} x^{4}-20274183401472000 \,{\mathrm e}^{x} x^{5}+3379030566912000 \,{\mathrm e}^{x} x^{6}-482718652416000 \,{\mathrm e}^{x} x^{7}[phone] \,{\mathrm e}^{x} x^{8}-6704425728000 \,{\mathrm e}^{x} x^{9}[phone] \,{\mathrm e}^{x} x^{10}-60949324800 \,{\mathrm e}^{x} x^{11}[phone] \,{\mathrm e}^{x} x^{12}-390700800 \,{\mathrm e}^{x} x^{13}[phone] \,{\mathrm e}^{x} x^{14}-1860480 \,{\mathrm e}^{x} x^{15}+116280 \,{\mathrm e}^{x} x^{16}-6840 \,{\mathrm e}^{x} x^{17}+380 \,{\mathrm e}^{x} x^{18}-20 \,{\mathrm e}^{x} x^{19}+{\mathrm e}^{x} x^{20}\)	\(143\)

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(exp(x)*x^20,x,method=_RETURNVERBOSE)

[Out]

2432902008176640000*exp(x)-2432902008176640000*exp(x)*x+1216451004088320000*exp(x)*x^2-405483668029440000*exp(
x)*x^3+101370917007360000*exp(x)*x^4-20274183401472000*exp(x)*x^5+3379030566912000*exp(x)*x^6-482718652416000*
exp(x)*x^7+60339831552000*exp(x)*x^8-6704425728000*exp(x)*x^9+670442572800*exp(x)*x^10-60949324800*exp(x)*x^11
[phone]*exp(x)*x^12-390700800*exp(x)*x^13+27907200*exp(x)*x^14-1860480*exp(x)*x^15+116280*exp(x)*x^16-6840
*exp(x)*x^17+380*exp(x)*x^18-20*exp(x)*x^19+exp(x)*x^20

________________________________________________________________________________________

Maxima [A]
time = 3.59, size = 101, normalized size = 0.62 \begin {gather*} {\left (x^{20} - 20 \, x^{19} + 380 \, x^{18} - 6840 \, x^{17} + 116280 \, x^{16} - 1860480 \, x^{15} + 27907200 \, x^{14} - 390700800 \, x^{13} + 5079110400 \, x^{12} - 60949324800 \, x^{11} + 670442572800 \, x^{10} - 6704425728000 \, x^{9} + 60339831552000 \, x^{8} - 482718652416000 \, x^{7} + 3379030566912000 \, x^{6} - 20274183401472000 \, x^{5} + 101370917007360000 \, x^{4} - 405483668029440000 \, x^{3} + 1216451004088320000 \, x^{2} - 2432902008176640000 \, x + 2432902008176640000\right )} e^{x} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(exp(x)*x^20,x, algorithm="maxima")

[Out]

(x^20 - 20*x^19 + 380*x^18 - 6840*x^17 + 116280*x^16 - 1860480*x^15 + 27907200*x^14 - 390700800*x^13 + 5079110
400*x^12 - 60949324800*x^11 + 670442572800*x^10 - 6704425728000*x^9 + 60339831552000*x^8 - 482718652416000*x^7
+ 3379030566912000*x^6 - 20274183401472000*x^5 + 101370917007360000*x^4 - 405483668029440000*x^3 + 1216451004
088320000*x^2 - 2432902008176640000*x + 2432902008176640000)*e^x

________________________________________________________________________________________

Fricas [A]
time = 0.71, size = 101, normalized size = 0.62 \begin {gather*} {\left (x^{20} - 20 \, x^{19} + 380 \, x^{18} - 6840 \, x^{17} + 116280 \, x^{16} - 1860480 \, x^{15} + 27907200 \, x^{14} - 390700800 \, x^{13} + 5079110400 \, x^{12} - 60949324800 \, x^{11} + 670442572800 \, x^{10} - 6704425728000 \, x^{9} + 60339831552000 \, x^{8} - 482718652416000 \, x^{7} + 3379030566912000 \, x^{6} - 20274183401472000 \, x^{5} + 101370917007360000 \, x^{4} - 405483668029440000 \, x^{3} + 1216451004088320000 \, x^{2} - 2432902008176640000 \, x + 2432902008176640000\right )} e^{x} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(exp(x)*x^20,x, algorithm="fricas")

[Out]

(x^20 - 20*x^19 + 380*x^18 - 6840*x^17 + 116280*x^16 - 1860480*x^15 + 27907200*x^14 - 390700800*x^13 + 5079110
400*x^12 - 60949324800*x^11 + 670442572800*x^10 - 6704425728000*x^9 + 60339831552000*x^8 - 482718652416000*x^7
+ 3379030566912000*x^6 - 20274183401472000*x^5 + 101370917007360000*x^4 - 405483668029440000*x^3 + 1216451004
088320000*x^2 - 2432902008176640000*x + 2432902008176640000)*e^x

________________________________________________________________________________________

Sympy [A]
time = 0.04, size = 102, normalized size = 0.63 \begin {gather*} \left (x^{20} - 20 x^{19} + 380 x^{18} - 6840 x^{17} + 116280 x^{16} - 1860480 x^{15} + 27907200 x^{14} - 390700800 x^{13} + 5079110400 x^{12} - 60949324800 x^{11} + 670442572800 x^{10} - 6704425728000 x^{9} + 60339831552000 x^{8} - 482718652416000 x^{7} + 3379030566912000 x^{6} - 20274183401472000 x^{5} + 101370917007360000 x^{4} - 405483668029440000 x^{3} + 1216451004088320000 x^{2} - 2432902008176640000 x + 2432902008176640000\right ) e^{x} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(exp(x)*x**20,x)

[Out]

(x**20 - 20*x**19 + 380*x**18 - 6840*x**17 + 116280*x**16 - 1860480*x**15 + 27907200*x**14 - 390700800*x**13 +
5079110400*x**12 - 60949324800*x**11 + 670442572800*x**10 - 6704425728000*x**9 + 60339831552000*x**8 - 482718
652416000*x**7 + 3379030566912000*x**6 - 20274183401472000*x**5 + 101370917007360000*x**4 - 405483668029440000
*x**3 + 1216451004088320000*x**2 - 2432902008176640000*x + 2432902008176640000)*exp(x)

________________________________________________________________________________________

Giac [A]
time = 0.86, size = 101, normalized size = 0.62 \begin {gather*} {\left (x^{20} - 20 \, x^{19} + 380 \, x^{18} - 6840 \, x^{17} + 116280 \, x^{16} - 1860480 \, x^{15} + 27907200 \, x^{14} - 390700800 \, x^{13} + 5079110400 \, x^{12} - 60949324800 \, x^{11} + 670442572800 \, x^{10} - 6704425728000 \, x^{9} + 60339831552000 \, x^{8} - 482718652416000 \, x^{7} + 3379030566912000 \, x^{6} - 20274183401472000 \, x^{5} + 101370917007360000 \, x^{4} - 405483668029440000 \, x^{3} + 1216451004088320000 \, x^{2} - 2432902008176640000 \, x + 2432902008176640000\right )} e^{x} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate(exp(x)*x^20,x, algorithm="giac")

[Out]

(x^20 - 20*x^19 + 380*x^18 - 6840*x^17 + 116280*x^16 - 1860480*x^15 + 27907200*x^14 - 390700800*x^13 + 5079110
400*x^12 - 60949324800*x^11 + 670442572800*x^10 - 6704425728000*x^9 + 60339831552000*x^8 - 482718652416000*x^7
+ 3379030566912000*x^6 - 20274183401472000*x^5 + 101370917007360000*x^4 - 405483668029440000*x^3 + 1216451004
088320000*x^2 - 2432902008176640000*x + 2432902008176640000)*e^x

________________________________________________________________________________________

Mupad [B]
time = 0.36, size = 101, normalized size = 0.62 \begin {gather*} {\mathrm {e}}^x\,\left (x^{20}-20\,x^{19}+380\,x^{18}-6840\,x^{17}+116280\,x^{16}-1860480\,x^{15}[phone]\,x^{14}-390700800\,x^{13}[phone]\,x^{12}-60949324800\,x^{11}[phone]\,x^{10}-6704425728000\,x^9+60339831552000\,x^8-482718652416000\,x^7+3379030566912000\,x^6-20274183401472000\,x^5+101370917007360000\,x^4-405483668029440000\,x^3+1216451004088320000\,x^2-2432902008176640000\,x+2432902008176640000\right ) \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int(x^20*exp(x),x)

[Out]

exp(x)*(1216451004088320000*x^2 - 2432902008176640000*x - 405483668029440000*x^3 + 101370917007360000*x^4 - 20
274183401472000*x^5 + 3379030566912000*x^6 - 482718652416000*x^7 + 60339831552000*x^8 - 6704425728000*x^9 + 67
0442572800*x^10 - 60949324800*x^11 + 5079110400*x^12 - 390700800*x^13 + 27907200*x^14 - 1860480*x^15 + 116280*
x^16 - 6840*x^17 + 380*x^18 - 20*x^19 + x^20 + 2432902008176640000)

________________________________________________________________________________________