A009204 Expansion of e.g.f. exp(sin(tanh(x))).

1, 1, 1, -2, -11, 8, 253, 344, -9463, -44416, 491609, 5130368, -30257347, -688030080, 1480493589, 109875416832, 177416283793, -20650894622720, -125705754161615, 4460981432725504, 53738108098148101, -1069938200055119872

Offset: 0

Author

R. H. Hardin

Keywords

• sign
• easy

Links

• Vincenzo Librandi, Table of n, a(n) for n = 0..200

Programs

Mathematica

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

Extensions

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

Definition clarified and Mathematica program replaced by Harvey P. Dale, Jun 16 2013