A012483 E.g.f.: tan(cos(x)*arcsin(x))=x-20/5!*x^5-56/7!*x^7+20112/9!*x^9...

1, 0, -20, -56, 20112, 1097536, 38765376, 9775415168, 3760405592320, 1130444627523584, 374326578677906432, 166462985126115207168, 92968540423042714603520, 59757419067771727772172288

Offset

1,3

Links

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

Mathematica

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

Crossrefs

Sequence in context: A109806 A331774 A216267 * A051872 A297397 A104100

Adjacent sequences: A012480 A012481 A012482 * A012484 A012485 A012486

Keyword

sign

Author

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

Extensions

Definition clarified by Harvey P. Dale, Jul 20 2012

Status

approved