close
login
A013163
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...
1
0, 2, -1, 20, -54, 1196, -7590, 183424, -2024456, 53868512, -879522480, 25940060736, -567297596448, 18589297654560, -510176264397072, 18555679255219584, -611191404598032000, 24595483932280127232
OFFSET
0,2
LINKS
MATHEMATICA
With[{nn=20}, CoefficientList[Series[ArcTanh[ArcTanh[x]+Log[x+1]], {x, 0, nn}], x] Range[0, nn]!] (* Harvey P. Dale, Apr 20 2016 *)
CROSSREFS
Sequence in context: A012927 A013158 A012932 * A191719 A009768 A051492
KEYWORD
sign
EXTENSIONS
Zero prepended and definition clarified by Harvey P. Dale, Apr 20 2016
STATUS
approved