A153761 Number of degree-n permutations of order exactly 11.
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3628800, 43545600, 283046400, 1320883200, 4953312000, 15850598400, 44910028800, 115482931200, 274271961600, 609493248000, 1279935820800, 4644633666390681600, 106826520356358566400, 1281918194457262387200, 10682651561168805120000
Offset: 1
Keywords
Links
- Alois P. Heinz, Table of n, a(n) for n = 1..200
Crossrefs
Column k=11 of A057731. - Alois P. Heinz, Feb 16 2013
Programs
-
Maple
a:= proc(n) option remember; `if`(n<11, 0, a(n-1)+(1+a(n-11))*(n-1)!/(n-11)!) end: seq(a(n), n=1..30); # Alois P. Heinz, Feb 16 2013
-
Mathematica
Rest[CoefficientList[Series[-Exp[x] + Exp[x + 1/11*x^11], {x, 0, 25}], x]*Range[0, 25]!] (* G. C. Greubel, Aug 27 2016 *)
Formula
E.g.f.: -exp(x)+exp(x+1/11*x^11). - Alois P. Heinz, Feb 16 2013
Extensions
More terms from Alois P. Heinz, Feb 16 2013