A270294 E.g.f.: Product_{k>=1} (1 + sinh(x^k)).

1, 1, 2, 13, 48, 381, 3120, 26923, 255696, 3158137, 40008240, 519979791, 7942304040, 122856625477, 2131578891624, 39647280625891, 750423985762080, 15134456564892273, 334165931467245216, 7422976578858122647, 177254117413133743800, 4454974632071621551741

Offset: 0

Author

Vaclav Kotesovec, Mar 21 2016

Keywords

• nonn

Links

• Vaclav Kotesovec, Table of n, a(n) for n = 0..440

Crossrefs

Cf. A000262, A229263, A270662, A270663.

Programs

Mathematica

nmax = 25; Range[0, nmax]!*CoefficientList[Series[Product[1+Sinh[x^k], {k, 1, nmax}], {x, 0, nmax}], x]