login
A330515
Expansion of e.g.f. Product_{k>=1} 1 / (1 - sinh(x^k)).
5
1, 1, 4, 19, 128, 921, 8912, 87109, 1045200, 13195681, 188639312, 2837096637, 47976425576, 837845855185, 16039578298200, 321739841159317, 6911395312352672, 154749452408120385, 3696709758990757856, 91546190261460505453, 2397650607409036823352
OFFSET
0,3
MATHEMATICA
nmax = 20; CoefficientList[Series[Product[1/(1 - Sinh[x^k]), {k, 1, nmax}], {x, 0, nmax}], x] Range[0, nmax]!
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Dec 17 2019
STATUS
approved