%I #12 Nov 29 2016 10:46:50
%S 0,1,6,90,2520,120960,9979200,1377295920,285145660800,78922558915200,
%T 27250976424672000,11359413770434329600,5628391828843104921600,
%U 3284252230408078849920000,2238997166752030045320960000
%N -arctan(log(x+1)-arctanh(x))=1/2!*x^2+6/4!*x^4+90/6!*x^6+2520/8!*x^8...
%t With[{nn=30},Take[CoefficientList[Series[-ArcTan[Log[x+1]-ArcTanh[x]],{x,0,nn}],x] Range[0,nn]!,{1,-1,2}]] (* _Ray Chandler_, Nov 29 2016 *)
%K nonn
%O 0,3
%A Patrick Demichel (patrick.demichel(AT)hp.com)