A293022 a(n) = n! * [x^n] exp(n*sinh(x)).

1, 1, 4, 30, 320, 4380, 73152, 1443008, 32837632, 846829008, 24406425600, 777438110240, 27122380259328, 1028481186011968, 42119646804852736, 1852697321086064640, 87113569172046479360, 4360314205952755126528, 231474221309788621111296, 12990330117363343153415680

Offset

0,3

Links

Robert Israel, Table of n, a(n) for n = 0..380

Maple

N:= 30: # to get a(0)..a(N)
S:= series(exp(n*sinh(x)), x, N+1):
seq(n!*coeff(S, x, n), n=0..N); # Robert Israel, Sep 29 2017

Mathematica

Table[n! SeriesCoefficient[Exp[n Sinh[x]], {x, 0, n}], {n, 0, 19}]

Crossrefs

Cf. A003724, A134200.

Sequence in context: A158834 A139086 A243244 * A360766 A298244 A293191

Adjacent sequences: A293019 A293020 A293021 * A293023 A293024 A293025

Keyword

nonn

Author

Ilya Gutkovskiy, Sep 28 2017

Status

approved