A096722 Denominators of terms in series expansion of arcsin(arctan(x)) - arctan(arcsin(x)).
1, 1, 1, 30, 756, 75600, 199584, 54486432000, 2421619200, 151227648000, 5913303492096000, 5203707073044480000, 512936840057241600000, 5041143264082570444800000, 1238175538546596249600000, 11695452372671563431936000000, 33500453776280426294437478400000, 44295044437526341433756221440000000
Offset: 0
Examples
arcsin(arctan(x)) - arctan(arcsin(x)) = -1/30*x^7 + 13/756*x^9 - 2329/75600*x^11 + 3749/199584*x^13 - 1405132357/54486432000*x^15 + ...
Links
- G. C. Greubel, Table of n, a(n) for n = 0..200
Crossrefs
Programs
-
Mathematica
Denominator[Take[CoefficientList[Series[ArcSin[ArcTan[x]] - ArcTan[ArcSin[x]], {x,0,40}], x], {2,-1,2}]] (* G. C. Greubel, Nov 18 2016 *)