%I #7 Oct 20 2012 16:04:35
%S 1,-5,137,-9029,1089713,-209177605,58539026361,-22507046465157,
%T 11386223123252449,-7334290106238920453,5861710212500532385641,
%U -5692596379677558396424645,6602985113623111671589590673
%N arctan(arctan(arcsinh(x)))=x-5/3!*x^3+137/5!*x^5-9029/7!*x^7...
%t With[{nn=30},Take[CoefficientList[Series[ArcTan[ArcTan[ArcSinh[x]]],{x,0,nn}],x]Range[0,nn-1]!,{2,-1,2}]] (* _Harvey P. Dale_, Oct 20 2012 *)
%K sign
%O 0,2
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Definition clarified by _Harvey P. Dale_, Oct 20 2012
|