OFFSET
0,5
COMMENTS
This is the labeled version of A000677 where pertinent definitions can be found.
LINKS
J. Riordan, The enumeration of trees by height and diameter, IBM Journal 4 (1960), 473-478. (Annotated scanned copy)
MATHEMATICA
nn = 20; T = NestList[z Exp[#] &, z, nn]; G[k_, z_] := T[[k + 1]];
H[k_, z_] := T[[k + 1]] - T[[k]]; H[0, z_] := z; ReplacePart[ Sum[Range[0, nn]! CoefficientList[Series[H[m, z]^2/2, {z, 0, nn}], z], {m, 1, nn/2 - 1}], 3 -> 1]
CROSSREFS
KEYWORD
nonn
AUTHOR
Geoffrey Critzer, Aug 02 2022
STATUS
approved