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,3

Links

Table of n, a(n) for n=0..19.

Mathematica

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

Crossrefs

Cf. A002017.

Sequence in context: A036691 A349514 A365293 * A002866 A182798 A374852

Adjacent sequences: A293018 A293019 A293020 * A293022 A293023 A293024

Keyword

sign

Author

Ilya Gutkovskiy, Sep 28 2017

Status

approved