A009175 - OEIS

A009175

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

1, 0, 0, 24, -256, 5632, -156032, 4761600, -178225152, 8081772544, -422364381184, 25184814366720, -1713906141986816, 131755307615387648, -11304870125221445632, 1075236678976585072640, -112837158484808719925248

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

OFFSET

0,4

LINKS

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

MATHEMATICA

With[{nn=40}, Take[CoefficientList[Series[Cosh[x]Cos[Sin[x]], {x, 0, nn}], x] Range[0, nn]!, {1, -1, 2}]] (* Harvey P. Dale, Dec 15 2024 *)

CROSSREFS

Sequence in context: A051828 A076847 A296575 * A308054 A296916 A187380

Adjacent sequences: A009172 A009173 A009174 * A009176 A009177 A009178

KEYWORD

sign

AUTHOR

R. H. Hardin

EXTENSIONS

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

Previous Mathematica program replaced by Harvey P. Dale, Dec 15 2024

STATUS

approved