OFFSET
0,2
LINKS
Moussa Benoumhani, On Whitney numbers of Dowling lattices, Discrete Math. 159 (1996), no. 1-3, 13-33.
FORMULA
a(n) = [x^n] (1/(1 - x)) * Sum_{k>=0} (x/(1 - x))^k / Product_{j=1..k} (1 - n*j*x/(1 - x)).
a(n) = n! * [x^n] exp(x + (exp(n*x) - 1) / n), for n > 0.
a(n) = A334165(n,n).
MATHEMATICA
Table[SeriesCoefficient[1/(1 - x) Sum[(x/(1 - x))^k/Product[(1 - n j x/(1 - x)), {j, 1, k}], {k, 0, n}], {x, 0, n}], {n, 0, 18}]
Join[{1}, Table[n! SeriesCoefficient[Exp[x + (Exp[n x] - 1)/n], {x, 0, n}], {n, 1, 18}]]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Apr 16 2020
STATUS
approved