login
Expansion of e.g.f.: sinh(arctanh(x)*log(x+1))=2/2!*x^2-3/3!*x^3+16/4!*x^4-50/5!*x^5...
0

%I #6 May 03 2018 16:38:19

%S 0,0,2,-3,16,-50,488,-3024,35376,-313704,4119552,-46248840,682997280,

%T -9209575440,152505104880,-2394128401560,44145984906240,

%U -789552273397440,16082343831221760,-322420285049880960

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

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

%K sign

%O 0,3

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

%E Definition clarified and first two zero terms prepended by _Harvey P. Dale_, May 03 2018