A055350 Number of labeled mobiles (circular rooted trees) with n nodes and 3 leaves.

8, 220, 4200, 71400, 1176000, 19474560, 330220800, 5787936000, 105380352000, 1997835840000, 39477236198400, 813155511168000, 17453093898240000, 390070546145280000, 9070029416448000000, 219204470936715264000

Offset: 4

Author

Christian G. Bower, May 15 2000

Keywords

• nonn

Links

• Georg Fischer, Table of n, a(n) for n = 4..250
• Index entries for sequences related to mobiles

Crossrefs

Column 3 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, 3}]& /@ CoefficientList[A[x], x]) * Range[0, m-1]!, 4] (* Jean-François Alcover, Nov 01 2019 *)