A270669 E.g.f.: Product_{k>=1} (1 + sinh(k*x^k)).
1, 1, 4, 31, 168, 1841, 19320, 226885, 2655408, 47569681, 743996880, 12582916061, 245804712120, 4831304993113, 109782586920552, 2669560767444901, 61579705719702240, 1566459883903878305, 44585240861695115808, 1212424119941953292461, 37517727808419084095400
Offset: 0
Keywords
Links
- Vaclav Kotesovec, Table of n, a(n) for n = 0..430
Programs
-
Mathematica
nn = 25; Range[0, nn]! * CoefficientList[Series[Product[1+Sinh[k*x^k], {k, 1, nn}], {x, 0, nn}], x]