|
%I #6 Jul 11 2018 12:07:25
%S 1,0,-4,6,77,-340,-3574,34062,278337,-5275800,-28795584,1159543110,
%T 2472700941,-340042014156,704790251070,126778070956110,
%U -958235638366239,-57637006798322672,866891599173180708
%N Expansion of e.g.f.: sech(tanh(x)+log(x+1))=1-4/2!*x^2+6/3!*x^3+77/4!*x^4-340/5!*x^5...
%t With[{nn=20},CoefficientList[Series[Sech[Tanh[x]+Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Jul 11 2018 *)
%K sign
%O 0,3
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Definition clarified by _Harvey P. Dale_, Jul 11 2018
|
