|
%I #6 Dec 21 2015 20:22:09
%S 1,0,1,-1,9,-33,235,-1517,12593,-111465,1122819,-12313409,147949593,
%T -1922353925,26918452691,-403744456541,6460109224801,-109820584161393,
%U 1976779056442179,-37558742545087481
%N Expansion of e.g.f.: exp(sinh(x)-log(x+1))=1+1/2!*x^2-1/3!*x^3+9/4!*x^4-33/5!*x^5...
%t With[{nn=20},CoefficientList[Series[Exp[Sinh[x]-Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Dec 21 2015 *)
%K sign
%O 0,5
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Definition clarified by _Harvey P. Dale_, Dec 21 2015
|
