A009173 Expansion of cosh(tanh(x)*tan(x)).

1, 12, 7952, 31111872, 414147567872, 13936708915940352, 987956358173680013312, 130572314003924554412900352, 29485421729721202391180048924672, 10655360784935131422152244665663619072

Offset

0,2

Links

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

Mathematica

With[{nn=40}, Take[CoefficientList[Series[Cosh[Tanh[x]*Tan[x]], {x, 0, nn}], x] Range[0, nn]!, {1, -1, 4}]] (* Harvey P. Dale, Aug 19 2020 *)

Crossrefs

Sequence in context: A308130 A107251 A201493 * A012531 A013481 A392970

Adjacent sequences: A009170 A009171 A009172 * A009174 A009175 A009176

Keyword

nonn

Author

R. H. Hardin

Extensions

Reformatted by Olivier Gérard, Mar 15 1997

Previous Mathematica program replaced by Harvey P. Dale, Aug 19 2020

Status

approved