A009202 Expansion of e.g.f.: exp(sin(sinh(x))).

1, 1, 1, 1, 1, -7, -47, -223, -895, -2959, -31, 82721, 1002497, 8156073, 53580465, 239061825, -8587007, -19348243487, -305732208959, -3454706477375, -30437638147583, -182295608480935, 144862063593105, 26905043182243041

Offset: 0

Author

R. H. Hardin

Keywords

• sign
• easy

Programs

Mathematica

With[{nn=30},CoefficientList[Series[Exp[Sin[Sinh[x]]],{x,0,nn}],x] Range[0,nn]!] (* Harvey P. Dale, Jul 30 2025 *)

Extensions

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

Definition clarified and previous Mathematica program replaced by Harvey P. Dale, Jul 30 2025