A013163 - OEIS

%I #11 Oct 04 2016 11:29:37

%S 0,2,-1,20,-54,1196,-7590,183424,-2024456,53868512,-879522480,

%T 25940060736,-567297596448,18589297654560,-510176264397072,

%U 18555679255219584,-611191404598032000,24595483932280127232

%N Expansion of e.g.f.: arctanh(arctanh(x)+log(x+1))=2*x-1/2!*x^2+20/3!*x^3-54/4!*x^4...

%H Harvey P. Dale, <a href="/A013163/b013163.txt">Table of n, a(n) for n = 0..394</a>

%t With[{nn=20},CoefficientList[Series[ArcTanh[ArcTanh[x]+Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Apr 20 2016 *)

%K sign

%O 0,2

%A Patrick Demichel (patrick.demichel(AT)hp.com)

%E Zero prepended and definition clarified by _Harvey P. Dale_, Apr 20 2016