OFFSET
0,3
FORMULA
E.g.f.: g(g(x) - 1), where g(x) = e.g.f. of A005651.
MATHEMATICA
nmax = 20; CoefficientList[Series[Product[1/(1 - (-1 + Product[1/(1 - x^k/k!), {k, 1, nmax}])^j/j!), {j, 1, nmax}], {x, 0, nmax}], x] Range[0, nmax]!
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Apr 15 2019
STATUS
approved