|
%I #14 May 28 2019 20:29:56
%S 1,-124,262096,-2681078464,83993259325696,-6291889632188161024,
%T 963296773204704677810176,-270352239123704851078462357504,
%U 128399592149905444543967414059073536
%N Expansion of sin(tan(x)*sin(x))/2.
%t Tanh[ Sinh[ x ]*Sin[ x ] ]/2 (* [ x^(4n+2) ] *)
%t With[{nn=34},Take[CoefficientList[Series[Tanh[Sinh[x]Sin[x]]/2,{x,0,nn}],x] Range[0,nn]!,{3,-1,4}]] (* _Harvey P. Dale_, May 28 2019 *)
%Y Cf. A023702.
%K sign
%O 0,2
%A _R. H. Hardin_
%E Extended with signs by _Olivier Gérard_, Mar 15 1997
|
