login
sech(sin(x)-arctan(x))=1-10/6!*x^6+1288/8!*x^8-152934/10!*x^10...
0

%I #6 Jan 31 2013 11:36:17

%S 1,0,0,-10,1288,-152934,22044484,-4128980986,1002646613616,

%T -309256569835534,118408798212804028,-55134457643443006338,

%U 30684616930799120314216,-20117431906536006109520470

%N sech(sin(x)-arctan(x))=1-10/6!*x^6+1288/8!*x^8-152934/10!*x^10...

%t With[{nn=30},Take[CoefficientList[Series[Sech[Sin[x]-ArcTan[x]],{x,0,nn}],x]Range[0,nn]!,{1,-1,2}]] (* _Harvey P. Dale_, Jan 31 2013 *)

%K sign

%O 0,4

%A Patrick Demichel (patrick.demichel(AT)hp.com)