|
%I #9 Apr 11 2014 17:32:10
%S 0,2,-1,9,-30,127,-855,5852,-46452,422101,-4210605,46275042,
%T -555647334,7222813951,-101114520507,1516765931792,-24268153134120,
%U 412557147859433,-7426039662804249,141094759708106686
%N E.g.f.: sinh(sin(x)+log(x+1)).
%e sinh(sin(x)+log(x+1)) = 2*x-1/2!*x^2+9/3!*x^3-30/4!*x^4+127/5!*x^5...
%t With[{nn=20},CoefficientList[Series[Sinh[Sin[x]+Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Apr 10 2014 *)
%K sign
%O 0,2
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Definition clarified and zero prepended to terms by _Harvey P. Dale_, Apr 10 2014
|
