OFFSET
0,3
COMMENTS
"EFJ" (unordered, size, labeled) transform of squares.
LINKS
C. G. Bower, Transforms (2)
MATHEMATICA
nmax = 23; CoefficientList[Series[Product[(1 + k x^k/(k - 1)!), {k, 1, nmax}], {x, 0, nmax}], x] Range[0, nmax]!
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Mar 24 2024
STATUS
approved