A330046 Expansion of e.g.f. exp(x) / (1 - sinh(x)).

1, 2, 5, 17, 77, 437, 2975, 23627, 214457, 2189897, 24846395, 310095887, 4221990437, 62273111357, 989164604615, 16834483468547, 305604501324017, 5894522593612817, 120381876933435635, 2595103478745235607, 58887707028270711197, 1403084759749993342277

Offset: 0

Author

Ilya Gutkovskiy, Nov 28 2019

Keywords

• nonn

Comments

Binomial transform of A006154.

Crossrefs

Cf. A000629, A006154, A009283, A327034, A330047.

Programs

Mathematica

nmax = 21; CoefficientList[Series[Exp[x]/(1 - Sinh[x]), {x, 0, nmax}], x] Range[0, nmax]!

Formula

a(n) = Sum_{k=0..n} binomial(n,k) * A006154(k).

a(n) ~ n! * (1 + 1/sqrt(2)) / (log(1 + sqrt(2)))^(n+1). - Vaclav Kotesovec, Dec 03 2019