|
%I #6 Aug 22 2014 12:13:43
%S 2,8,336,32832,6596352,2172377088,1074790176768,742942875451392,
%T 684332863424888832,809904627202731540480,1197620189653593343131648,
%U 2163726873433446527375769600,4689766098958031240193965555712
%N arcsin(arctanh(x)+arctan(x))=2*x+8/3!*x^3+336/5!*x^5+32832/7!*x^7...
%t With[{nn=30},Take[CoefficientList[Series[ArcSin[ArcTanh[x]+ArcTan[x]],{x,0,nn}],x] Range[0,nn-1]!,{2,-1,2}]] (* _Harvey P. Dale_, Aug 22 2014 *)
%K nonn
%O 0,1
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Definition clarified by _Harvey P. Dale_, Aug 22 2014
|
