A024301 E.g.f.: sin(x)*sin(tan(x))/2 (even powers only).

0, 1, 0, -16, -992, -59008, -4264960, -377357440, -39934410752, -4874528317440, -648133739913216, -82576764673884160, -4996506942853611520, 3557436402223979200512, 2987583282428346311376896

Offset

0,4

Links

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

Mathematica

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

Crossrefs

A009548.

Sequence in context: A211086 A187802 A181199 * A211090 A160012 A070307

Adjacent sequences: A024298 A024299 A024300 * A024302 A024303 A024304

Keyword

sign,easy

Author

R. H. Hardin

Extensions

Definition clarified by Harvey P. Dale, Aug 24 2012

Status

approved