A009216 E.g.f.: exp(sin(x)/exp(x)).

1, 1, -1, -3, 9, 17, -145, 21, 2961, -9119, -58273, 530541, 177177, -24815503, 109736783, 845196933, -11562650847, 9274089409, 818943535295, -6145817165859, -30817061557719, 818240768280017, -3016149953173201, -67401109608160779

Offset

0,4

Links

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

Mathematica

With[{nn=30}, CoefficientList[Series[Exp[Sin[x]/Exp[x]], {x, 0, nn}], x] Range[ 0, nn]!] (* Harvey P. Dale, Feb 21 2013 *)

Crossrefs

Sequence in context: A105538 A056404 A056405 * A103072 A109228 A355636

Adjacent sequences: A009213 A009214 A009215 * A009217 A009218 A009219

Keyword

sign,easy

Author

R. H. Hardin

Extensions

Extended with signs by Olivier Gérard, Mar 15 1997

Definition clarified by Harvey P. Dale, Feb 21 2013

Status

approved