%I #6 Apr 13 2019 16:59:01
%S 1,-1,25,-1057,81905,-10280289,1887120585,-476966767617,
%T 158890850697185,-67468163508862017,35571148438980847225,
%U -22799419589275221917281,17459463801481355245128145
%N sech(tanh(x)*cos(x))=1-1/2!*x^2+25/4!*x^4-1057/6!*x^6+81905/8!*x^8...
%t With[{nn=30},Take[CoefficientList[Series[Sech[Tanh[x]Cos[x]],{x,0,nn}],x] Range[0,nn]!,{1,-1,2}]] (* _Harvey P. Dale_, Apr 13 2019 *)
%K sign
%O 0,3
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|