The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

Thanks to everyone who made a donation during our annual appeal!
To see the list of donors, or make a donation, see the OEIS Foundation home page.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A053508 a(n) = binomial(n-1,3)*n^(n-4). 5
 0, 0, 0, 1, 20, 360, 6860, 143360, 3306744, 84000000, 2338460520, 70946979840, 2332989862060, 82726831323136, 3148511132812500, 128071114403348480, 5546563698427324720, 254873089955815096320, 12387799656377835411984 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,5 REFERENCES R. P. Stanley, Enumerative Combinatorics, Cambridge, Vol. 2, 1999; see Prop. 5.3.2. LINKS G. C. Greubel, Table of n, a(n) for n = 1..250 FORMULA E.g.f.: LambertW(-x)^4/4!. - Vladeta Jovovic, Apr 07 2001 MATHEMATICA Table[Binomial[n-1, 3]n^(n-4), {n, 25}] (* Harvey P. Dale, Jun 17 2014 *) With[{nmax = 25}, CoefficientList[Series[LambertW[-x]^4/4!, {x, 0, nmax}], x]*Range[0, nmax]!] (* G. C. Greubel, Nov 14 2017 *) PROG (PARI) vector(25, n, binomial(n-1, 3)*n^(n-4)) \\ G. C. Greubel, Jan 18 2017 (MAGMA) [Binomial(n-1, 3)*n^(n-4): n in [1..25]]; // G. C. Greubel, Nov 14 2017 (Sage) [binomial(n-1, 3)*n^(n-4) for n in (1..25)] # G. C. Greubel, May 15 2019 (GAP) List([1..25], n-> Binomial(n-1, 3)*n^(n-4)) # G. C. Greubel, May 15 2019 CROSSREFS Cf. A000169, A053506, A053507, A053509. Sequence in context: A089350 A323961 A004292 * A060918 A115100 A049683 Adjacent sequences:  A053505 A053506 A053507 * A053509 A053510 A053511 KEYWORD nonn AUTHOR N. J. A. Sloane, Jan 15 2000 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified January 18 04:57 EST 2021. Contains 340250 sequences. (Running on oeis4.)