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

%I #4 Sep 29 2017 07:20:08

%S 1,1,4,24,192,1880,21312,266504,3469312,42094656,297625600,

%T -8727514752,-659406274560,-31019532622208,-1314656227540992,

%U -54314985911216640,-2248955319931633664,-94369141109824233472,-4028982346754921594880,-175032005028072692797440

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

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

%Y Cf. A002017.

%K sign

%O 0,3

%A _Ilya Gutkovskiy_, Sep 28 2017