|
Search: id:A076699
|
|
|
| A076699 |
|
T(n,k)=Table of coefficients of x^k in cyclotomic(n,x). |
|
+0
1
|
|
| 1, -1, 1, 1, 1, 0, 1, 1, 1, 0, 1, 0, 1, 0, 0, 1, 1, 1, 1, 1, 0, 1, -1, 1, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0, 0, 1, -1, 1, -1, 1, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0, -1, 0, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, -1, 1, -1, 1, -1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, -1
(list; table; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
EXAMPLE
|
Table is {1}, {-1, 1}, {1, 1, 0}, {1, 1, 1, 0} because the cyclotomic polynomials for n=0..3 are 1, -1 + x, 1 + x, 1 + x + x^2
|
|
MATHEMATICA
|
Table[Drop[CoefficientList[x^(n+1)+Cyclotomic[n, x], x], -1], {n, 0, 7}]
|
|
CROSSREFS
|
Row sums, apart from initial 1, equal A020500
Sequence in context: A131522 A011750 A010055 this_sequence A091862 A082551 A127507
Adjacent sequences: A076696 A076697 A076698 this_sequence A076700 A076701 A076702
|
|
KEYWORD
|
easy,sign,tabl
|
|
AUTHOR
|
Wouter Meeussen (wouter.meeussen(AT)pandora.be), Oct 26 2002
|
|
|
Search completed in 0.002 seconds
|
