A012940 Expansion of e.g.f. cos(tan(x)+sin(x)) (even powers only).

1, -4, 8, -118, 1912, 53094, 7487532, 722809274, 92118225104, 13286089862286, 2227449108601940, 418148868660099330, 84975662262230959480, 17350569219593304893078, 2817250972553523348038716, -252622788373980942633484214

Offset

0,2

Links

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

Example

1-4/2!*x^2+8/4!*x^4-118/6!*x^6+1912/8!*x^8...

Mathematica

With[{nn=30}, Take[CoefficientList[Series[Cos[Tan[x]+Sin[x]], {x, 0, nn}], x]Range[0, nn]!, {1, -1, 2}]] (* Harvey P. Dale, Mar 26 2012 *)

Crossrefs

Sequence in context: A215844 A111100 A105036 * A182967 A013049 A193155

Adjacent sequences: A012937 A012938 A012939 * A012941 A012942 A012943

Keyword

sign

Author

Patrick Demichel

Extensions

More terms from Harvey P. Dale, Mar 26 2012

Status

approved