%I #6 Jan 28 2013 17:01:22
%S 2,-16,552,-41984,5530752,-1117490944,320707001344,-123976597878784,
%T 62093009928880128,-39107324387947577344,30249801409640561901568,
%U -28190352567614102755082240,31151946815227412004856659968
%N tanh(arctan(x)+tan(x))=2*x-16/3!*x^3+552/5!*x^5-41984/7!*x^7...
%t With[{nn=30},Take[CoefficientList[Series[Tanh[ArcTan[x]+Tan[x]],{x,0,nn}],x] Range[0,nn-1]!,{2,-2,2}]] (* _Harvey P. Dale_, Jan 28 2013 *)
%K sign
%O 0,1
%A Patrick Demichel (patrick.demichel(AT)hp.com)