login
A307566
Expansion of Product_{j>=1} (1 + j*(-1 + Product_{k>=1} (1 + k*x^k))^j).
1
1, 1, 4, 18, 72, 289, 1119, 4301, 16408, 62313, 234914, 879822, 3274623, 12125348, 44707778, 164258803, 601535222, 2195926654, 7990792367, 28985219498, 104811279467, 377875493610, 1358584361039, 4872111113570, 17431266435024, 62229179950735, 221699783190996, 788274748711694
OFFSET
0,3
FORMULA
G.f.: g(g(x) - 1), where g(x) = g.f. of A022629.
MATHEMATICA
nmax = 27; CoefficientList[Series[Product[(1 + j (-1 + Product[(1 + k x^k), {k, 1, nmax}])^j), {j, 1, nmax}], {x, 0, nmax}], x]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Apr 15 2019
STATUS
approved