login
A009219
Expansion of e.g.f.: exp(sinh(sin(x))).
0
1, 1, 1, 1, 1, -7, -47, -111, 1, 1073, 13409, 94337, 77441, -2853783, -19836879, -123530351, -535288319, 9169805409, 139742075329, 451648395649, -2263631905535, -48860758779943, -1157041164813423, -9373388534437103
OFFSET
0,6
MATHEMATICA
With[{nn=30}, CoefficientList[Series[Exp[Sinh[Sin[x]]], {x, 0, nn}], x] Range[ 0, nn]!] (* Harvey P. Dale, Oct 20 2019 *)
CROSSREFS
Sequence in context: A044490 A139916 A376246 * A348394 A158713 A142185
KEYWORD
sign,easy
AUTHOR
EXTENSIONS
Extended with signs by Olivier Gérard, Mar 15 1997
Definition clarified and prior Mathematica program replaced by Harvey P. Dale, Oct 20 2019
STATUS
approved