%I #6 Nov 14 2013 15:42:43
%S 1,0,0,10,-1288,152934,-21952084,4051623706,-956802094896,
%T 283850233488142,-103778358157367212,45952155963779123106,
%U -24267844868956822679176,15082728649311299637576790
%N cosh(sin(x)-arctan(x))=1+10/6!*x^6-1288/8!*x^8+152934/10!*x^10...
%t With[{nn=30},Take[CoefficientList[Series[Cosh[Sin[x]-ArcTan[x]],{x,0,nn}],x] Range[0,nn]!,{1,-1,2}]] (* _Harvey P. Dale_, Nov 14 2013 *)
%K sign
%O 0,4
%A Patrick Demichel (patrick.demichel(AT)hp.com)