A009776 E.g.f.: tanh(log(1+x))*cos(x).

0, 1, -1, -3, 12, -25, -15, 623, -4592, 18909, 17595, -1233551, 13641276, -81119597, -105681667, 10102782675, -148962722880, 1158387845177, 1940315387607, -234950313889819, 4330346354150860, -41597707520306049, -85160442362115351

Offset

0,4

Links

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

Mathematica

With[{nn=30}, CoefficientList[Series[Tanh[Log[1+x]]*Cos[x], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Sep 21 2012 *)

Crossrefs

Sequence in context: A076506 A206917 A320334 * A331241 A068967 A071355

Adjacent sequences: A009773 A009774 A009775 * A009777 A009778 A009779

Keyword

sign,easy

Author

R. H. Hardin

Extensions

Definition clarified by Harvey P. Dale, Sep 21 2012

Status

approved