A096754 Triangle read by rows giving coefficients of the trigonometric expansion of Cos(n*x).
1, 1, 0, -1, 1, 0, -3, 1, 0, -6, 0, 1, 1, 0, -10, 0, 5, 1, 0, -15, 0, 15, 0, -1, 1, 0, -21, 0, 35, 0, -7, 1, 0, -28, 0, 70, 0, -28, 0, 1, 1, 0, -36, 0, 126, 0, -84, 0, 9, 1, 0, -45, 0, 210, 0, -210, 0, 45, 0, -1, 1, 0, -55, 0, 330, 0, -462, 0, 165, 0, -11, 1, 0, -66, 0, 495, 0, -924, 0, 495, 0, -66, 0, 1, 1, 0, -78, 0, 715
Offset: 1
Examples
The trigonometric expansion of Cos(4x) = Cos[x]^4 - 6*Cos[x]^2*Sin[x]^2 + Sin[x]^4, therefore the fourth row is 1, 0, -6, 0, 1. The trigonometric expansion of Cos(5x) = Cos[x]^5 - 10*Cos[x]^3*Sin[x]^2 + 5*Cos[x]*Sin[x]^4, therefore the fifth row of the triangle is 1, 0, -10, 0, 5 The table begins: 1 1 0 -1 1 0 -3 1 0 -6 0 1 1 0 -10 0 5 1 0 -15 0 15 0 -1 1 0 -21 0 35 0 -7 1 0 -28 0 70 0 -28 0 1
Links
- Clark Kimberling, Polynomials associated with reciprocation, JIS 12 (2009) 09.3.4, section 5.
Crossrefs
Programs
-
Mathematica
Flatten[Table[ Plus @@ CoefficientList[ TrigExpand[ Cos[n*x]], { Cos[x], Sin[x]}], {n, 13}]]
Comments