%I #6 Sep 01 2024 11:10:08
%S 1,0,0,0,-3,40,-250,840,-4515,87120,-949500,4360400,-24799775,
%T 1013539800,-16719504750,82697979000,-246429558375,40173677908000,
%U -928344422395000,3990578889492000,32523853181113125
%N Expansion of e.g.f.: cos(log(x+1)-arctan(x))=1-3/4!*x^4+40/5!*x^5-250/6!*x^6+840/7!*x^7...
%t With[{nn=20},CoefficientList[Series[Cos[Log[x+1]-ArcTan[x]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Sep 01 2024 *)
%K sign
%O 0,5
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Definition clarified by _Harvey P. Dale_, Sep 01 2024