%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)
|