login
A055351
Number of labeled mobiles (circular rooted trees) with n nodes and 4 leaves.
2
30, 1500, 47250, 1234800, 29635200, 685843200, 15717240000, 362244960000, 8476532064000, 202580554176000, 4963223577312000, 124948285862400000, 3236755595673600000, 86346680044584960000, 2372991796225290240000
OFFSET
5,1
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, 4}] & /@ CoefficientList[A[x], x]) * Range[0, m - 1]!, 5] (* Jean-François Alcover, Nov 01 2019 *)
CROSSREFS
Column 4 of A055349.
Sequence in context: A369143 A318496 A000173 * A103917 A196464 A280360
KEYWORD
nonn
AUTHOR
Christian G. Bower, May 15 2000
STATUS
approved