A013049 cos(sinh(x)+tan(x))=1-4/2!*x^2-8/4!*x^4+122/6!*x^6+5352/8!*x^8...

1, -4, -8, 122, 5352, 239494, 14203028, 1067540778, 94081990576, 8737926966734, 612930093492268, -75242844404703342, -70546032648374158392, -35348193779396075142282, -16607148139155135705120508, -8041224802288813510222074374, -4132501715459889292923513686176

Offset

0,2

Links

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

Mathematica

With[{nn=40}, Take[CoefficientList[Series[Cos[Sinh[x]+Tan[x]], {x, 0, nn}], x] Range[0, nn]!, {1, -1, 2}]] (* Harvey P. Dale, Jan 12 2017 *)

Crossrefs

Sequence in context: A105036 A012940 A182967 * A193155 A060239 A127943

Adjacent sequences: A013046 A013047 A013048 * A013050 A013051 A013052

Keyword

sign

Author

Patrick Demichel (patrick.demichel(AT)hp.com)

Extensions

More terms from Harvey P. Dale, Jan 12 2017

Status

approved