A009144 Expansion of cosh(sin(x))/cos(x).

1, 2, 8, 88, 2176, 78080, 4159616, 307882240, 29920681984, 3710767394816, 571523842998272, 107010484096565248, 23940179383147724800, 6306683724617339961344, 1932337463823712544620544

Offset

0,2

Links

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

Formula

a(n) ~ (2*n)! * (exp(1) + exp(-1)) / (Pi/2)^(2*n+1). - Vaclav Kotesovec, Jan 22 2015

Mathematica

Cosh[ Sin[ x ] ]/Cos[ x ] (* Even Part *)
nn = 20; Table[(CoefficientList[Series[Cosh[Sin[x]]*Sec[x], {x, 0, 2*nn}], x] * Range[0, 2*nn]!)[[n]], {n, 1, 2*nn+1, 2}] (* Vaclav Kotesovec, Jan 22 2015 *)

Crossrefs

Sequence in context: A083831 A134245 A141313 * A132316 A136749 A226321

Adjacent sequences: A009141 A009142 A009143 * A009145 A009146 A009147

Keyword

nonn

Author

R. H. Hardin

Extensions

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

Status

approved