A012400 - OEIS

%I #6 Nov 29 2017 18:12:45

%S 1,0,0,0,-12,60,-90,420,-11648,88704,-118440,1491600,-85167192,

%T 865152288,317981664,19296033120,-2535023513088,30778504850304,

%U 126137259616320,388230513819264,-214673614448387712

%N Expansion of e.g.f.: cos(arctan(x)*log(x+1))=1-12/4!*x^4+60/5!*x^5-90/6!*x^6+420/7!*x^7...

%t With[{nn=20},CoefficientList[Series[Cos[ArcTan[x]Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Nov 29 2017 *)

%K sign

%O 0,5

%A Patrick Demichel (patrick.demichel(AT)hp.com)

%E Definition clarified by _Harvey P. Dale_, Nov 29 2017