|
%I #4 Aug 19 2014 20:32:59
%S 1,1,1026,60820473,64146764716036,631284899540195312505,
%T 38539161299138154741325704036,11011511482200093499929279574758403927,
%U 11981061614421454177965724891826362153433952264,42406820883646957465685129173683494532584922157233295569
%N Sum of tenth powers of coefficients in full expansion of (z_1+z_2+...+z_n)^n.
%H Alois P. Heinz, <a href="/A246245/b246245.txt">Table of n, a(n) for n = 0..69</a>
%F a(n) = [x^n] (n!)^10 * (Sum_{j=0..n} x^j/(j!)^10)^n.
%p b:= proc(n, i) option remember; `if`(n=0, 1, `if`(i<1, 0,
%p add(b(n-j, i-1)*binomial(n, j)^9/j!, j=0..n)))
%p end:
%p a:= n-> n!*b(n$2):
%p seq(a(n), n=0..12);
%Y Column k=10 of A245397.
%K nonn
%O 0,3
%A _Alois P. Heinz_, Aug 19 2014
| 