|
%I #19 Jul 11 2020 02:33:52
%S 1,0,1,1109,58370761,616967236620839,2667424979594724623421841,
%T 7363013376580445620328429354795257679,
%U 18165626590057176919253932602358956717053291818375681,53130672834302729155813211757017136527240145191602729876485547920535679
%N a(n) = Sum_{k=0..n} (-1)^(n-k) * multinomial(n+(n-1)*k; n-k, {k}^n).
%H Seiichi Manyama, <a href="/A336172/b336172.txt">Table of n, a(n) for n = 0..26</a>
%F a(n) = [x^n] Sum_{k=0..n} (n*k)!/k!^n * x^k / (1+x)^(n*k+1).
%t a[n_] := Sum[(-1)^(n - k)*(n + (n - 1)*k)!/((n - k)!*k!^n), {k, 0, n}]; Array[a, 10, 0] (* _Amiram Eldar_, Jul 10 2020 *)
%o (PARI) {a(n) = sum(k=0, n, (-1)^(n-k)*(n+(n-1)*k)!/((n-k)!*k!^n))}
%Y Main diagonal of A336169.
%Y Cf. A229267.
%K nonn
%O 0,4
%A _Seiichi Manyama_, Jul 10 2020
| 