|
%I #6 May 20 2021 13:47:28
%S 1,0,-4,6,13,-20,-550,1470,23965,-91800,-1736800,5533550,261341425,
%T -1560159900,-32046389050,113528073750,10312454985625,-82637650862000,
%U -1992440583581500,7977656452281750
%N Expansion of e.g.f.: cos(arctan(x)+log(x+1))=1-4/2!*x^2+6/3!*x^3+13/4!*x^4-20/5!*x^5...
%t With[{nn=20},CoefficientList[Series[Cos[ArcTan[x]+Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, May 20 2021 *)
%K sign
%O 0,3
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Definition clarified by _Harvey P. Dale_, May 20 2021
|
