|
%I #6 Dec 17 2017 13:47:13
%S 2,-8,72,-3936,193920,-21876736,2967878656,-589063146496,
%T 149737853943808,-48291040167362560,19310260456438693888,
%U -9310185546185219768320,5359263862743046978797568
%N sin(arctan(x)+tan(x))=2*x-8/3!*x^3+72/5!*x^5-3936/7!*x^7...
%t With[{nn=30},Take[CoefficientList[Series[Sin[ArcTan[x]+Tan[x]],{x,0,nn}],x] Range[0,nn-1]!,{2,-1,2}]] (* _Harvey P. Dale_, Dec 17 2017 *)
%K sign
%O 0,1
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|
