|
|
A028298
|
|
Triangle of coefficients in expansion of sin(n*x) (or sin(n*x)/cos(x) if n is even) in ascending powers of sin(x).
|
|
1
|
|
|
1, 2, 3, -4, 4, -8, 5, -20, 16, 6, -32, 32, 7, -56, 112, -64, 8, -80, 192, -128, 9, -120, 432, -576, 256, 10, -160, 672, -1024, 512, 11, -220, 1232, -2816, 2816, -1024, 12, -280, 1792, -4608, 5120, -2048, 13, -364, 2912, -9984, 16640, -13312, 4096, 14, -448, 4032, -15360, 28160, -24576, 8192, 15, -560, 6048
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
REFERENCES
|
I. S. Gradshteyn and I. M. Ryzhik, Tables of Integrals, Series and Products, 5th ed., Section 1.335, p. 35.
|
|
LINKS
|
|
|
EXAMPLE
|
sin 3x = 3 sin x - 4 sin^3 x, sin 4x / cos x = 4 sin x - 8 sin^3 x, etc.
|
|
MATHEMATICA
|
t[n_] := (Sin[n x]/If[EvenQ[n], Cos[x], 1] // TrigExpand) /. Cos[x]^m_ /; EvenQ[m] -> (1 - Sin[x]^2)^(m/2) // Expand; Flatten[Table[ Partition[ CoefficientList[t[n], Sin[x]] , 2][[All, 2]], {n, 1, 15}]][[1 ;; 59]] (* Jean-François Alcover, May 06 2011 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nice,easy,sign
|
|
AUTHOR
|
|
|
EXTENSIONS
|
More terms from Larry Reeves (larryr(AT)acm.org), Sep 08 2000
|
|
STATUS
|
approved
|
|
|
|