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

Author

Ilya Gutkovskiy, Sep 28 2017

Keywords

• nonn

Links

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

Crossrefs

Cf. A003724, A134200.

Programs

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}]