A096717 Numerators of terms in series expansion of arcsin(arctan(x)).

1, -1, 13, -341, 18649, -177761, 1087433, -4043494549, 1674761567, -284891766539657, 106410874319325461, -48402125366670946877, 26344930021064765797249, -27048608191991004321089, 6237195766537863970288933, -16102066950215127630856787159, 2258820895862623437612519923989

Offset: 0

Author

N. J. A. Sloane, Aug 15 2004

Keywords

• sign
• frac

Examples

			arcsin(arctan(x)) = x - 1/6*x^3 + 13/120*x^5 - 341/5040*x^7 + 18649/362880*x^9 - 177761/4435200*x^11 + ...
		

Links

• G. C. Greubel, Table of n, a(n) for n = 0..200

Crossrefs

Cf. A096718, A096664, A096671, A096712, A096716, A045688, A045689, A096719, A096720, A096721, A096722.

Programs

Mathematica

Numerator[Take[CoefficientList[Series[ArcSin[ArcTan[x]], {x,0,50}], x], {2, -1, 2}]] (* G. C. Greubel, Nov 17 2016 *)