A009784 Expansion of tanh(log(1+x)*cosh(x)).

0, 1, -1, 3, 0, -65, 525, -3619, 15512, 51549, -2308365, 37073399, -417301896, 2878576779, 13832070161, -1001340728543, 23330589314640, -373263648419975, 3611687964249159, 21971926549737643, -2211581913138852400

Offset

0,4

Links

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

Mathematica

With[{nn=30}, CoefficientList[Series[Tanh[Log[1+x]Cosh[x]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Nov 10 2011 *)

Crossrefs

Sequence in context: A012759 A296621 A120953 * A276909 A276910 A013245

Adjacent sequences: A009781 A009782 A009783 * A009785 A009786 A009787

Keyword

sign,easy

Author

R. H. Hardin

Extensions

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

Status

approved