|
| |
|
|
A013596
|
|
Triangle of coefficients of cyclotomic polynomial Phi_n(x) (exponents in decreasing order).
|
|
2
|
|
|
|
1, 0, 1, -1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, -1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1, 1, -1, 1, -1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, -1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, -1, 1, -1, 1, -1, 1, 1, -1, 0, 1, -1, 1, 0, -1, 1, 1, 0, 0, 0, 0
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,1
|
|
|
COMMENTS
|
We follow Maple in defining Phi_0 to be x; it could equally well be taken to be 1.
|
|
|
REFERENCES
|
E. R. Berlekamp, Algebraic Coding Theory, McGraw-Hill, 1968; see p. 90.
K. Ireland and M. Rosen, A Classical Introduction to Modern Number Theory, Springer, 1982, p. 194.
Z. I. Borevich and I. R. Shafarevich, Number Theory. Academic Press, NY, 1966, p. 325.
|
|
|
LINKS
|
Table of n, a(n) for n=0..93.
|
|
|
EXAMPLE
|
Phi_0 = x; Phi_1 = x-1; Phi_2 = x+1; Phi_3 = x^2+x+1; Phi_4 = x^2+1; ...
|
|
|
MAPLE
|
with(numtheory): [ seq(cyclotomic(n, x), n=0..48) ];
|
|
|
MATHEMATICA
|
Join[{1, 0}, Table[ CoefficientList[ Cyclotomic[n, x], x] // Reverse, {n, 1, 16}] // Flatten] (* Jean-François Alcover, Dec 11 2012 *)
|
|
|
CROSSREFS
|
Cf. A013595.
A013595 is the "increasing" version of this sequence.
Sequence in context: A072418 A128973 A176412 * A131695 A105812 A134323
Adjacent sequences: A013593 A013594 A013595 * A013597 A013598 A013599
|
|
|
KEYWORD
|
sign,easy,nice,tabf
|
|
|
AUTHOR
|
N. J. A. Sloane.
|
|
|
STATUS
|
approved
|
| |
|
|