A009539 - OEIS

A009539

Expansion of sin(x)*cosh(tan(x)).

1, 2, 36, 944, 41104, 2650592, 237023424, 28021573376, 4225816615168, 790713657219584, 179579770991391744, 48624187236528582656, 15465493506159120388096, 5706480969286870250971136

(list; graph; refs; listen; history; text; internal format)

OFFSET

0,2

LINKS

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

MATHEMATICA

With[{nn=30}, Take[CoefficientList[Series[Sin[x]*Cosh[Tan[x]], {x, 0, nn}], x] Range[0, nn-1]!, {2, -1, 2}]] (* Harvey P. Dale, May 03 2015 *)

CROSSREFS

Sequence in context: A001626 A166473 A279575 * A009554 A209036 A375839

Adjacent sequences: A009536 A009537 A009538 * A009540 A009541 A009542

KEYWORD

nonn

AUTHOR

R. H. Hardin

EXTENSIONS

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

Prior Mathematica program replaced by Harvey P. Dale, May 03 2015

STATUS

approved