%I #6 Feb 16 2016 17:50:41
%S 0,1,-1,1,-12,63,-375,3687,-35056,378613,-4917645,67955413,
%T -1033969596,17404675923,-314140085987,6110547378491,-127722302945280,
%U 2840677016304009,-67146193511101593,1681517639666168201
%N Expansion of e.g.f.: arctanh(sech(x)*log(x+1))=x-1/2!*x^2+1/3!*x^3-12/4!*x^4+63/5!*x^5...
%t With[{nn=20},CoefficientList[Series[ArcTanh[Sech[x]Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Feb 16 2016 *)
%K sign
%O 0,5
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Zero prepended and definition clarified by _Harvey P. Dale_, Feb 16 2016