[go: up one dir, main page]

login
A371493
Expansion of e.g.f. Product_{k>=2} (1 + x^k/k).
1
1, 0, 1, 2, 6, 44, 210, 1644, 11088, 119664, 1034640, 12372480, 139629600, 1877722560, 25389131040, 395162832960, 6041860070400, 105872058754560, 1864694944465920, 35822359116149760, 705399920144640000, 15048474234019430400, 324762706938629836800, 7566557300438795366400
OFFSET
0,4
MATHEMATICA
nmax = 23; CoefficientList[Series[Product[(1 + x^k/k), {k, 2, nmax}], {x, 0, nmax}], x] Range[0, nmax]!
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Mar 25 2024
STATUS
approved