%I #6 Feb 13 2018 19:34:46
%S 0,0,2,-3,0,-10,328,-2184,5040,-40104,1311552,-15123240,72848160,
%T -748098000,27513786480,-450798649560,3381295357440,-44199243856320,
%U 1837919010900480,-39019174967975040,402216681934690560
%N Expansion of e.g.f.: sinh(arctan(x)*log(x+1))=2/2!*x^2-3/3!*x^3-10/5!*x^5+328/6!*x^6...
%t With[{nn=30},CoefficientList[Series[Sinh[ArcTan[x]Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Feb 13 2018 *)
%K sign
%O 0,3
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Two zeros prepended and definition clarified by _Harvey P. Dale_, Feb 13 2018
|