A024234 - OEIS

%I #11 Apr 02 2017 14:43:11

%S 0,1,2,-29,-988,-62939,-4717978,-418216889,-44866810168,

%T -5568619124279,-761113513112758,-103460768181476309,

%U -9224922283633430548,2672684609947750327021,2823780970401362133222062

%N Expansion of sin(tan(x)*sin(x))/2.

%t With[{nn=30},Take[CoefficientList[Series[(Sin[Tan[x]Sin[x]])/2,{x,0,nn}],x] Range[0,nn]!,{1,-1,2}]] (* _Harvey P. Dale_, Jan 11 2017 *)

%Y Cf. A009513.

%K sign

%O 0,3

%A _R. H. Hardin_

%E Extended with signs Mar 1997

%E Prior Mathematica program replaced by _Harvey P. Dale_, Jan 11 2017