%I #9 Feb 01 2024 17:52:48
%S 0,2,-1,12,-30,270,-1215,12600,-81900,992250,-8434125,117879300,
%T -1237732650,19666196550,-245827456875,4382752374000,-63549909423000,
%U 1257302087291250,-20745484440305625,451231749105637500
%N Expansion of e.g.f. sinh(arctanh(x) + log(x+1)).
%e 2*x - 1/2!*x^2 + 12/3!*x^3 - 30/4!*x^4 + 270/5!*x^5 ...
%t With[{nn=30},CoefficientList[Series[Sinh[ArcTanh[x]+Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Feb 01 2024 *)
%K sign
%O 0,2
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E a(0)=0 inserted and title improved by _Sean A. Irvine_, Jul 31 2018