|
%I #6 Nov 28 2016 17:54:34
%S 1,-1,21,-1149,119305,-20082841,4984310493,-1711500674389,
%T 776816116717457,-450301381427975089,324553968807761095973,
%U -284661632752853556677805,298518404617173649259722905
%N sech(arctan(arctan(x)))=1-1/2!*x^2+21/4!*x^4-1149/6!*x^6+119305/8!*x^8...
%t With[{nn=30},Take[CoefficientList[Series[Sech[ArcTan[ArcTan[x]]],{x,0,nn}],x] Range[0,nn]!,{1,-1,2}]] (* _Ray Chandler_, Nov 28 2016 *)
%K sign
%O 0,3
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|
