%I #6 Nov 29 2016 08:42:34
%S 2,-8,80,-4160,177920,-25548800,2560563200,-702660608000,
%T 129295622144000,-57197188186112000,16886573106790400000,
%U -10912577096233779200000,4743735379760119808000000
%N sin(arctanh(x)+arctan(x))=2*x-8/3!*x^3+80/5!*x^5-4160/7!*x^7...
%t With[{nn=30},Take[CoefficientList[Series[Sin[ArcTanh[x]+ArcTan[x]],{x,0,nn}],x] Range[0,nn-1]!,{2,-1,2}]] (* _Ray Chandler_, Nov 29 2016 *)
%K sign
%O 0,1
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|