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

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A182661 Expansion of x^3*exp(-x)/(3*(1-x)). 1
 2, 0, 20, 80, 630, 4928, 44520, 444960, 4894890, 58738240, 763597692, 10690366960, 160355505310, 2565688083840, 43616697426640, 785100553677888, 14916910519881810, 298338210397633920, 6265102418350314980, 137832253203706926480 (list; graph; refs; listen; history; text; internal format)
 OFFSET 3,1 COMMENTS a(n) is the number of 3-cycles in all derangements of {1,2,...n}. LINKS FORMULA E.g.f.: x^3 * exp(-x)/(3*(1-x)). In general, E.g.f. for the number of k cycles in the derangements of [n] is: x^k * exp(-x)/(k*(1-x)). MAPLE egf:= x^3 * exp(-x)/(3*(1-x)): a:= n-> n! * coeff (series (egf, x, n+1), x, n): seq (a(n), n=3..25); MATHEMATICA Table[Count[Flatten[Map[Length, Map[ToCycles, Derangements[n]], {2}]], 3], {n, 0, 8}] Range[0, 20]! CoefficientList[Series[x^3/3 Exp[-x]/(1-x), {x, 0, 20}], x] CROSSREFS Cf. A000387. Sequence in context: A280622 A211880 A209868 * A189772 A217311 A266167 Adjacent sequences:  A182658 A182659 A182660 * A182662 A182663 A182664 KEYWORD nonn AUTHOR Geoffrey Critzer, Feb 01 2011 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 April 20 09:21 EDT 2021. Contains 343125 sequences. (Running on oeis4.)