%I #6 Nov 28 2016 19:46:33
%S 0,2,-4,-130,2200,393178,-36230060,-2241493098,696842413488,
%T 151155071419698,-94998751466350804,4870009119362109230,
%U 9231493784347343489864,1174397467642045406094346
%N arctan(sinh(x)*arctan(x))=2/2!*x^2-4/4!*x^4-130/6!*x^6+2200/8!*x^8...
%t With[{nn=30},Take[CoefficientList[Series[ArcTan[Sinh[x]*ArcTan[x]],{x,0,nn}],x] Range[0,nn]!,{1,-1,2}]] (* _Ray Chandler_, Nov 28 2016 *)
%K sign
%O 0,2
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|