%I #7 Nov 21 2013 12:46:02
%S 1,0,0,40,896,62304,7514496,1093708928,222602768384,59177065262592,
%T 19661155936868352,8041910306499811328,3968598123713485832192,
%U 2324068812945480395448320,1594018675642134181026299904
%N sec(sin(x)-arcsin(x))=1+40/6!*x^6+896/8!*x^8+62304/10!*x^10...
%t With[{nn=30},Take[CoefficientList[Series[Sec[Sin[x]-ArcSin[x]],{x,0,nn}], x]Range[0,nn]!,{1,-1,2}]] (* _Harvey P. Dale_, Dec 09 2011 *)
%K nonn
%O 0,4
%A Patrick Demichel (patrick.demichel(AT)hp.com)
|