A293021 a(n) = n! * [x^n] exp(n*sin(x)).

1, 1, 4, 24, 192, 1880, 21312, 266504, 3469312, 42094656, 297625600, -8727514752, -659406274560, -31019532622208, -1314656227540992, -54314985911216640, -2248955319931633664, -94369141109824233472, -4028982346754921594880, -175032005028072692797440

Offset: 0

Author

Ilya Gutkovskiy, Sep 28 2017

Keywords

• sign

Crossrefs

Cf. A002017.

Programs

Mathematica

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