A012436 cos(arctan(x)*arcsin(x))=1-12/4!*x^4+120/6!*x^6-7728/8!*x^8...

1, 0, -12, 120, -7728, 358080, -54956352, 5983845504, -1674895273728, 331567748941824, -147083657045302272, 46138766175213803520, -29742693904194176593920, 13565163573403491059712000

Offset

0,3

Links

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

Mathematica

With[{nn=30}, Take[CoefficientList[Series[Cos[ArcTan[x]ArcSin[x]], {x, 0, nn}], x] Range[0, nn]!, {1, -1, 2}]] (* Harvey P. Dale, Oct 14 2019 *)

Crossrefs

Sequence in context: A012615 A012559 A009164 * A012619 A012563 A301898

Adjacent sequences: A012433 A012434 A012435 * A012437 A012438 A012439

Keyword

sign

Author

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

Status

approved