login
Expansion of e.g.f.: exp(arctanh(x)*log(x+1))=1+2/2!*x^2-3/3!*x^3+28/4!*x^4-110/5!*x^5...
1

%I #6 Dec 08 2019 18:37:21

%S 1,0,2,-3,28,-110,1058,-6804,75024,-664488,8456712,-94737720,

%T 1378535112,-18587872368,305610292752,-4802794952760,88232994448128,

%U -1580181612876864,32119507894881216,-644756418530970624

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

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

%K sign

%O 0,3

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

%E Definition clarified by _Harvey P. Dale_, Dec 08 2019