A009247 Expansion of exp(tan(x)*cosh(x)).

1, 1, 1, 6, 21, 92, 597, 3472, 26537, 209488, 1834249, 17750304, 180938109, 2024471360, 23781199197, 300235771648, 3989919982673, 56114783183104, 830092069266577, 12879188611161600, 209479116176732901, 3554985326516636672

Offset

0,4

Links

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

Mathematica

CoefficientList[Series[Exp[Tan[x]*Cosh[x]], {x, 0, 20}], x]Range[0, 20]! (* Harvey P. Dale, Jul 25 2011 *)

Crossrefs

Sequence in context: A006359 A001553 A369556 * A093774 A151612 A344496

Adjacent sequences: A009244 A009245 A009246 * A009248 A009249 A009250

Keyword

nonn,easy

Author

R. H. Hardin

Extensions

Extended and signs tested Mar 15 1997 by Olivier Gérard.

Status

approved