|
|
A220816
|
|
Number of rooted binary MUL-trees with n leaves on the label set [3].
|
|
3
|
|
|
3, 6, 18, 75, 333, 1620, 8208, 43188, 232947, 1282824, 7178598, 40711158, 233445483, 1351255608, 7884677052, 46330220604, 273905815095, 1628113352418, 9724235975136, 58330497033576, 351252593186211, 2122598374680816, 12867757823745036, 78235685862460893
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MAPLE
|
a:= proc(n) option remember; `if`(n<2, 3*n, `if`(n::odd, 0,
(t-> t*(1-t)/2)(a(n/2)))+add(a(i)*a(n-i), i=1..n/2))
end:
|
|
MATHEMATICA
|
a[n_] := a[n] = If[n < 2, 3 n, If[OddQ[n], 0, (# (1 - #)/2 &)[a[n/2]]] + Sum[a[i] a[n - i], {i, 1, n/2}]];
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
a(7) corrected and terms a(11) and beyond from Andrew Howroyd, Sep 22 2018
|
|
STATUS
|
approved
|
|
|
|