%I #9 Nov 21 2013 12:46:01
%S 1,-5,121,-6845,690481,-108594485,24502918441,-7495966306925,
%T 2984112329052001,-1498441322462840165,926096248873419539161,
%U -690670275602276172370205,611502034169544516212107921
%N tanh(arctan(sin(x)))=x-5/3!*x^3+121/5!*x^5-6845/7!*x^7+690481/9!*x^9...
%e E.g.f.: tanh(arctan(sin(x))), even terms only. [From Harvey P. Dale, Sep 19 2011]
%t With[{nn=30},Take[CoefficientList[Series[Tanh[ArcTan[Sin[x]]],{x,0,nn}], x] Range[0,nn-1]!,{2,-1,2}]] (* _Harvey P. Dale_, Sep 19 2011 *)
%K sign
%O 0,2
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|