login
A009184
Expansion of e.g.f.: cosh(x)/exp(sin(x)).
0
1, -1, 2, -3, 4, 3, -32, 105, -48, -1081, 5600, -5643, -85568, 547467, -533504, -12925983, 85827840, -21466225, -3149702656, 19155660141, 27282224128, -1094661097965, 5424499154944, 26420430767577, -496815684169728, 1642571602653527
OFFSET
0,3
MATHEMATICA
With[{nn=30}, CoefficientList[Series[Cosh[x]/Exp[Sin[x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Jun 11 2017 *)
CROSSREFS
Sequence in context: A295368 A283832 A102086 * A009716 A009590 A009492
KEYWORD
sign,easy
AUTHOR
EXTENSIONS
Extended with signs by Olivier Gérard, Mar 15 1997
Definition clarified and previous Mathematica program replaced by Harvey P. Dale, Jun 11 2017
STATUS
approved