|
%I #6 Jun 22 2019 19:08:17
%S 1,0,0,0,12,-60,90,-420,15008,-149184,572040,-4263600,153746472,
%T -2274880608,14574976416,-151922927520,6077379610368,-119360435727744,
%U 1090133783570880,-14675613664063104
%N Expansion of e.g.f.: cosh(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[Cosh[ArcTan[x]Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Jun 22 2019 *)
%K sign
%O 0,5
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Definition clarified by _Harvey P. Dale_, Jun 22 2019
|
