|
%I #6 May 08 2017 17:55:09
%S 1,-15,271,-8495,492391,-47885175,6512761711,-1126039513055,
%T 241996705222231,-64384007995020135,20971047413824897951,
%U -8203471786087609654415,3781059328242133245372871
%N arctan(sin(x)-tanh(x))=1/3!*x^3-15/5!*x^5+271/7!*x^7-8495/9!*x^9...
%t With[{nn=40},Take[CoefficientList[Series[ArcTan[Sin[x]-Tanh[x]],{x,0,nn}],x] Range[ 0,nn-1]!,{4,-1,2}]] (* _Harvey P. Dale_, May 08 2017 *)
%K sign
%O 0,2
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|
