%I #11 Jul 20 2012 14:10:09
%S 1,0,-20,-56,20112,1097536,38765376,9775415168,3760405592320,
%T 1130444627523584,374326578677906432,166462985126115207168,
%U 92968540423042714603520,59757419067771727772172288
%N E.g.f.: tan(cos(x)*arcsin(x))=x-20/5!*x^5-56/7!*x^7+20112/9!*x^9...
%t With[{nn=30},Take[CoefficientList[Series[Tan[Cos[x]ArcSin[x]],{x,0,nn}],x]Range[0,nn-1]!,{2,-1,2}]] (* _Harvey P. Dale_, Jul 20 2012 *)
%K sign
%O 1,3
%A Patrick Demichel (patrick.demichel(AT)hp.com)
%E Definition clarified by _Harvey P. Dale_, Jul 20 2012
|