|
%I #6 Mar 20 2015 17:06:36
%S 1,0,0,0,-12,60,-450,2940,-14000,34272,929880,-22680240,373861224,
%T -5345779296,65277500288,-619227292320,1524395375360,135262063693184,
%U -5049805793018304,129393583799366016
%N E.g.f.: sech(sinh(x)*log(x+1))=1-12/4!*x^4+60/5!*x^5-450/6!*x^6+2940/7!*x^7...
%t With[{nn=20},CoefficientList[Series[Sech[Sinh[x]Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Mar 20 2015 *)
%K sign
%O 0,5
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Definition clarified by _Harvey P. Dale_, Mar 20 2015
|
