A012411 - OEIS

%I #9 Jan 15 2018 15:26:01

%S 0,1,2,-1,-28,-107,470,10243,51592,-677879,-15870422,-76105753,

%T 2647708780,62662672733,171362144382,-21259413359701,-489069754224624,

%U 774485831879569,300884931182492754

%N arctan(arctan(x)*exp(x)) = x + 2/2!*x^2 - 1/3!*x^3 - 28/4!*x^4 - 107/5!*x^5 + ...

%t With[{nn=30},CoefficientList[Series[ArcTan[ArcTan[x]*Exp[x]],{x,0,nn}],x] Range[0,nn]!] (* _Ray Chandler_, Nov 28 2016 *)

%K sign

%O 0,3

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