%I #6 Jan 27 2015 18:02:02
%S 0,2,-1,-16,42,756,-5130,-82584,1145256,15632064,-405336960,
%T -4218834816,206734828608,1303793191008,-142600433831856,
%U -162973525708224,126855035118725760,-683674107835961088
%N Expansion of e.g.f.: arctan(arctan(x)+log(x+1))=2*x-1/2!*x^2-16/3!*x^3+42/4!*x^4+756/5!*x^5...
%t With[{nn=20},CoefficientList[Series[ArcTan[ArcTan[x]+Log[x+1]],{x,0,nn}],x] Range[0,nn]!] (* _Harvey P. Dale_, Jan 27 2015 *)
%K sign
%O 0,2
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Definition clarified by and zero prepended by _Harvey P. Dale_, Jan 27 2015
|