A294192 a(n) = n! * [x^n] exp(n*(1/(1-x)^n- 1)).

1, 1, 28, 1881, 241696, 50903725, 15950981376, 6965675824177, 4044321664205824, 3013398202413705561, 2802908316869098624000, 3183461016834811739809321, 4335741846110695855971852288, 6974958097518147761490109983781

Offset

0,3

Links

Robert Israel, Table of n, a(n) for n = 0..100

Maple

S:= series(exp(n*(1/(1-x)^n-1)), x, 31):
seq(n!*coeff(S, x, n), n=0..30); # Robert Israel, Oct 24 2017

Mathematica

Table[n! SeriesCoefficient[Exp[n (1 / (1 - x)^n - 1)], {x, 0, n}], {n, 0, 20}] (* Vincenzo Librandi, Oct 25 2017 *)

Crossrefs

Main diagonal of A294188.

Cf. A294047.

Sequence in context: A333125 A197438 A263026 * A202811 A285749 A276702

Adjacent sequences: A294189 A294190 A294191 * A294193 A294194 A294195

Keyword

nonn

Author

Seiichi Manyama, Oct 24 2017

Status

approved