|
%I #6 Sep 21 2019 14:46:12
%S 1,0,-4,60,-824,120,1331156,-151389420,15474229936,-1609208740560,
%T 165275248217516,-13317787644945300,-752763454703346104,
%U 1012558531283275284360,-490748297800639153012924
%N exp(cos(x)-sech(x))=1-4/4!*x^4+60/6!*x^6-824/8!*x^8+120/10!*x^10...
%t With[{nn=30},Take[CoefficientList[Series[Exp[Cos[x]-Sech[x]],{x,0,nn}],x] Range[0,nn]!,{1,-1,2}]] (* _Harvey P. Dale_, Sep 21 2019 *)
%K sign
%O 0,3
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|
