%I #6 Jan 01 2014 15:18:17
%S 3,23,721,32759,2672461,310461227,49895013169,10516703525327,
%T 2811203923750741,926105108276716115,367211453075540071769,
%U 171643737525955364628727,92766252900694480314741821
%N sin(sin(x)-arctanh(x))=-3/3!*x^3-23/5!*x^5-721/7!*x^7-32759/9!*x^9...
%t With[{nn=30},Take[-CoefficientList[Series[Sin[Sin[x]-ArcTanh[x]],{x,0,nn}],x] Range[0,nn-1]!,{4,-1,2}]] (* _Harvey P. Dale_, Jan 01 2014 *)
%K nonn
%O 0,1
%A Patrick Demichel (patrick.demichel(AT)hp.com)