login
Number of permutations of [n] having exactly eight nontrivial cycles.
2

%I #11 Jul 17 2017 02:53:43

%S 2027025,218243025,13818229425,680438103345,29079209884725,

%T 1141483113695925,42556765607801445,1539279211706361125,

%U 54789078082648965055,1938102614993339970175,68612592434209034386175,2443274471026078967051775,87839862102761225799417075

%N Number of permutations of [n] having exactly eight nontrivial cycles.

%C A nontrivial cycle has size > 1.

%H Alois P. Heinz, <a href="/A289956/b289956.txt">Table of n, a(n) for n = 16..450</a>

%H Wikipedia, <a href="https://en.wikipedia.org/wiki/Permutation">Permutation</a>

%F E.g.f.: (log(1-x)+x)^8/8!*exp(x).

%t Drop[CoefficientList[Series[(Log[1 - x] + x)^8/8!*Exp[x] , {x, 0, 50}], x] * Table[k !, {k, 0, 50}] , 16] (* _Indranil Ghosh_, Jul 16 2017 *)

%o (PARI) x = 'x + O('x^30); Vec(serlaplace((-log(1-x)-x)^8/8!*exp(x))) \\ _Michel Marcus_, Jul 16 2017

%Y Column k=8 of A136394.

%K nonn

%O 16,1

%A _Alois P. Heinz_, Jul 16 2017