[go: up one dir, main page]

login
A020547
2nd Euler polynomial evaluated at x=n!.
2
0, 0, 2, 30, 552, 14280, 517680, 25396560, 1625662080, 131681531520, 13168185811200, 1593350882323200, 229442532323558400, 38775788037405619200, 7600054456464819148800, 1710012252722891749632000, 437763136697374129754112000
OFFSET
0,3
FORMULA
a(n) = n!*(n!-1). - Mark van Hoeij, May 13 2013
a(n) = A000142(n)*A000142(n-1). - Michel Marcus, Apr 15 2015
MATHEMATICA
Table[n! (n! - 1), {n, 0, 20}] (* Vincenzo Librandi, Apr 15 2015 *)
PROG
(PARI) vector(20, n, n--; (n!)^2-n!) \\ Michel Marcus, Apr 15 2015
(Magma) [Factorial(n)*(Factorial(n)-1): n in [0..30]]; // Vincenzo Librandi, Apr 15 2015
CROSSREFS
Cf. A000142 (n!).
Sequence in context: A072976 A143414 A099046 * A208881 A297490 A324957
KEYWORD
nonn,easy
AUTHOR
STATUS
approved