A055355 Number of labeled mobiles (circular rooted trees) with n nodes and 8 leaves.
45360, 9862560, 1160973000, 99904860000, 7103580541200, 445556635524000, 25652184715357200, 1391455702596960000, 72404516222438400000, 3661224054771419136000, 181631020686490222848000
Offset: 9
Keywords
Links
Crossrefs
Column 8 of A055349.
Programs
-
Mathematica
m = 20; L[x_] = Log[1 - x] + O[x]^m // Normal; A[_] = 0; Do[A[x_] = x y - x L[A[x]] + O[x]^k // Normal // Expand, {k, m}]; Drop[(SeriesCoefficient[#, {y, 0, 8}] & /@ CoefficientList[A[x], x]) * Range[0, m - 1]!, 9] (* Jean-François Alcover, Nov 01 2019 *)