%I #6 Aug 16 2016 10:32:01
%S 1,0,0,10,840,87750,12402500,2338055850,572148486000,177069963820750,
%T 67752690483757500,31441329951467231250,17409362545770168545000,
%U 11342985795968641587093750,8592815549188913685325312500
%N sec(arcsin(x)-arctanh(x))=1+10/6!*x^6+840/8!*x^8+87750/10!*x^10...
%t With[{nn=30},Take[CoefficientList[Series[Sec[ArcSin[x]-ArcTanh[x]],{x,0,nn}],x] Range[0,nn]!,{1,-1,2}]] (* _Harvey P. Dale_, Aug 16 2016 *)
%K nonn
%O 0,4
%A Patrick Demichel (patrick.demichel(AT)hp.com)