%I #4 Sep 03 2018 21:47:52
%S 0,1,1,2,4,9,20,48,114,284,714,1829,4731,12391,32711,87083,233347,
%T 629132,1705026,4642964,12696279,34851400,95996667,265251800,
%U 735029359,2042187008,5687725928,15876511087,44409195451,124459715968,349434210318,982723567822
%N Number of rooted trees with n nodes such that no more than six subtrees of the same size extend from the same node.
%H Alois P. Heinz, <a href="/A318800/b318800.txt">Table of n, a(n) for n = 0..2136</a>
%p g:= proc(n, i) option remember; `if`(n=0, 1, `if`(i<1, 0, add(
%p binomial(g((i-1)$2)+j-1, j)*g(n-i*j, i-1), j=0..min(6, n/i))))
%p end:
%p a:= n-> g((n-1)$2):
%p seq(a(n), n=0..40);
%Y Column k=6 of A318753.
%K nonn
%O 0,4
%A _Alois P. Heinz_, Sep 03 2018
|