|
%I #10 Nov 19 2016 03:12:31
%S 0,0,0,-1,13,-2329,3749,-1405132357,41223659,-3230487913,
%T 87420689313263,-92876785811395309,6545378422138547141,
%U -76226954122169434345117,13717355610784766550119,-152042860419225571514252591,325359516347299085987218014617,-501994552683503696983628163720749,226141284010354023120430917899293
%N Numerators of terms in series expansion of arcsin(arctan(x)) - arctan(arcsin(x)).
%H G. C. Greubel, <a href="/A096721/b096721.txt">Table of n, a(n) for n = 0..200</a>
%e 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 + ...
%t With[{nn=40},Numerator[Take[CoefficientList[Series[ArcSin[ArcTan[x]] - ArcTan[ArcSin[x]],{x,0,nn}],x],{2,-1,2}]]] (* _Harvey P. Dale_, Dec 07 2011 *)
%Y Cf. A096722, A096717, A096718, A096664, A096671, A096712, A096716, A045688, A045689, A096719, A096720.
%K sign,frac
%O 0,5
%A _N. J. A. Sloane_, Aug 15 2004
|
