Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #4 Sep 03 2018 21:35:45
%S 0,1,1,2,4,9,20,47,113,281,706,1807,4671,12223,32245,85777,229670,
%T 618732,1675523,4558995,12456746,34166520,94034681,259621349,
%U 718846409,1995609079,5553497132,15489246752,43290735944,121226413303,340079037154,955633681302
%N Number of rooted trees with n nodes such that no more than five subtrees of the same size extend from the same node.
%H Alois P. Heinz, <a href="/A318799/b318799.txt">Table of n, a(n) for n = 0..2138</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(5, n/i))))
%p end:
%p a:= n-> g((n-1)$2):
%p seq(a(n), n=0..40);
%Y Column k=5 of A318753.
%K nonn
%O 0,4
%A _Alois P. Heinz_, Sep 03 2018