login
E.g.f.: sech(sin(x)-arctanh(x))=1-90/6!*x^6-3864/8!*x^8-326214/10!*x^10...
0

%I #6 Jul 04 2012 14:38:02

%S 1,0,0,-90,-3864,-326214,-33507276,-4970687722,-949869512144,

%T -236464361818318,-73751391110641012,-28454096973841135058,

%U -13304169550531141566328,-7432891904926457008929270

%N E.g.f.: sech(sin(x)-arctanh(x))=1-90/6!*x^6-3864/8!*x^8-326214/10!*x^10...

%t With[{nn=30},Take[CoefficientList[Series[Sech[Sin[x]-ArcTanh[x]],{x,0,nn}],x]Range[0,nn]!,{1,-1,2}]] (* _Harvey P. Dale_, Jul 04 2012 *)

%K sign

%O 0,4

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

%E Definition clarified by _Harvey P. Dale_, Jul 04 2012