|
%I #6 Jul 21 2018 11:39:44
%S 1,0,-12,360,-9968,-20160,62513088,-11126763648,1288066390272,
%T 19652873951232,-83472832434404352,36956701107235768320,
%U -9713959158890293555200,-340935340396162516992000
%N sech(arcsinh(x)*arctan(x))=1-12/4!*x^4+360/6!*x^6-9968/8!*x^8...
%t With[{nn=30},Take[CoefficientList[Series[Sech[ArcSinh[x]ArcTan[x]],{x,0,nn}],x] Range[0,nn]!,{1,-1,2}]] (* _Harvey P. Dale_, Jul 21 2018 *)
%K sign
%O 0,3
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|
