%I #6 Sep 07 2022 16:13:58
%S 1,0,0,-90,-3864,-326214,-38496876,-6363118762,-1391451773264,
%T -390207547318222,-136581823796686036,-58397588436566980370,
%U -29960029691855345080504,-18169010205146250870789750
%N cos(sin(x)-arctanh(x))=1-90/6!*x^6-3864/8!*x^8-326214/10!*x^10...
%t With[{nn=30},Take[CoefficientList[Series[Cos[Sin[x]-ArcTanh[x]],{x,0,nn}],x] Range[ 0,nn]!,{1,-1,2}]] (* _Harvey P. Dale_, Sep 07 2022 *)
%K sign
%O 0,4
%A Patrick Demichel (patrick.demichel(AT)hp.com)