A013410 Coefficient of x^(2n+1)/(2n+1)! in arctan(arcsin(x)-arctan(x))=3/3!*x^3-15/5!*x^5+945/7!*x^7-44415/9!*x^9...

0, 3, -15, 945, -44415, 5769225, -711485775, 171504558225, -40549611477375, 15553976334521625, -6025672551378855375, 3368007502842396038625, -1937899053877871819109375, 1488068350680083972290115625

Offset

0,2

Links

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

Mathematica

With[{nn=30}, Take[CoefficientList[Series[ArcTan[ArcSin[x]-ArcTan[x]], {x, 0, nn}], x] Range[0, nn-1]!, {4, -1, 2}]] (* Harvey P. Dale, Mar 25 2013 *)

Prog

(PARI) A013410(n)=x='x+O('x^(2*n+2)); polcoeff(atan(asin(x)-atan(x)), 2*n+1)*(n*2+1)!

Crossrefs

Sequence in context: A013409 A013408 A013412 * A029521 A272353 A012766

Adjacent sequences: A013407 A013408 A013409 * A013411 A013412 A013413

Keyword

sign

Author

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

Extensions

Definition clarified by Harvey P. Dale and M. F. Hasler, initial term a(0)=0 added as suggested by N. J. A. Sloane, Mar 25 2013

Status

approved