login
sec(sin(x)-arctanh(x))=1+90/6!*x^6+3864/8!*x^8+326214/10!*x^10...
0

%I #6 Jun 08 2017 15:04:33

%S 1,0,0,90,3864,326214,45981276,8451765322,2053825164944,

%T 641663385808078,249042559475513572,117658592297847708338,

%U 66515862023755958383768,44326271307924691256260470

%N sec(sin(x)-arctanh(x))=1+90/6!*x^6+3864/8!*x^8+326214/10!*x^10...

%t With[{nn=30},Take[CoefficientList[Series[Sec[Sin[x]-ArcTanh[x]],{x,0,nn}],x] Range[0,nn]!,{1,-1,2}]] (* _Harvey P. Dale_, Jun 08 2017 *)

%K nonn

%O 0,4

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