|
%I #6 Dec 30 2015 12:01:38
%S 2,0,-80,-2688,18688,2928640,827766784,-52425949184,11263759220736,
%T -6439993741672448,1974174235078164480,-952764420869394006016,
%U 577855093673994995367936,-371995357739088472730238976
%N tanh(arctan(x)*tan(x))=2/2!*x^2-80/6!*x^6-2688/8!*x^8+18688/10!*x^10...
%t With[{nn=30},Take[CoefficientList[Series[Tanh[ArcTan[x]Tan[x]],{x,0,nn}],x] Range[0,nn]!,{3,-1,2}]] (* _Harvey P. Dale_, Dec 30 2015 *)
%K sign
%O 0,1
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|
