A009825 Expansion of tanh(x)*cos(sin(x)).

1, -5, 61, -1217, 38137, -1753245, 112141173, -9583252569, 1057866255601, -146689651631285, 24972471277262509, -5121374164476105329, 1245379275329762046441, -354323420531627060286029

Offset

0,2

Links

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

Mathematica

With[{nn=30}, Take[CoefficientList[Series[Tanh[x]*Cos[Sin[x]], {x, 0, nn}], x] Range[0, nn-1]!, {2, -1, 2}]] (* Harvey P. Dale, May 29 2013 *)

Crossrefs

Sequence in context: A217820 A217821 A371371 * A065919 A196125 A345103

Adjacent sequences: A009822 A009823 A009824 * A009826 A009827 A009828

Keyword

sign

Author

R. H. Hardin

Extensions

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

Status

approved