A009772 Expansion of tanh(log(1+sinh(x))).

0, 1, -1, 1, 2, -29, 194, -1049, 4472, -6299, -171736, 2993101, -34111408, 302131831, -1763868016, -4643279549, 370023946112, -7698953963639, 115221639807104, -1282442213912999, 6786946897932032, 150369505621009291

Offset

0,5

Links

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

Mathematica

With[{nn=30}, CoefficientList[Series[Tanh[Log[1+Sinh[x]]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, May 29 2013 *)

Crossrefs

Sequence in context: A132412 A369384 A342454 * A179024 A179025 A377627

Adjacent sequences: A009769 A009770 A009771 * A009773 A009774 A009775

Keyword

sign,easy

Author

R. H. Hardin

Extensions

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

Status

approved