A009258 Expansion of exp(tanh(sin(x))).

1, 1, 1, -2, -11, 8, 253, 288, -9911, -40192, 567449, 4910720, -42551299, -708052992, 3661191381, 124294481920, -252072060911, -26387620528128, -34332471915599, 6672448330104832, 34386811167577477, -1974770538516348928

Offset

0,4

Links

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

Mathematica

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

Crossrefs

Sequence in context: A220771 A375881 A277055 * A009204 A023642 A025536

Adjacent sequences: A009255 A009256 A009257 * A009259 A009260 A009261

Keyword

sign,easy

Author

R. H. Hardin

Extensions

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

Previous Mathematica program replaced by Harvey P. Dale, Dec 15 2025

Status

approved