[go: up one dir, main page]

login
A153761
Number of degree-n permutations of order exactly 11.
3
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,11
LINKS
FORMULA
E.g.f.: -exp(x)+exp(x+1/11*x^11). - Alois P. Heinz, Feb 16 2013
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 *)
CROSSREFS
Column k=11 of A057731. - Alois P. Heinz, Feb 16 2013
Sequence in context: A226889 A284207 A061603 * A133132 A228913 A179065
KEYWORD
nonn
AUTHOR
Franz Vrabec, Jan 01 2009
EXTENSIONS
More terms from Alois P. Heinz, Feb 16 2013
STATUS
approved