OFFSET
0,20
COMMENTS
LINKS
Alois P. Heinz, Rows n = 0..60, flattened
EXAMPLE
P(5,x) = x^10 + 2*x^9 + 3*x^8 + 3*x^7 + 2*x^6 - 2*x^4 - 3*x^3 - 3*x^2 - 2*x - 1 hence: 1,2,3,3,2,0,-2,-3,-3,-2,-1 is a segment in the sequence.
Triangle begins:
[1]
[1, -1]
[1, 0, -1]
[1, 1, 0, -1, -1]
[1, 1, 1, 0, -1, -1, -1]
[1, 2, 3, 3, 2, 0, -2, -3, -3, -2, -1]
[1, 1, 2, 2, 2, 1, 0, -1, -2, -2, -2, -1, -1]
[1, 2, 4, 6, 8, 9, 9, 7, 4, 0, -4, -7, -9, -9, -8, -6, -4, -2, -1]
...
MAPLE
T:= n-> (p-> seq(coeff(p, x, degree(p)-i), i=0..degree(p)))(
mul(numtheory[cyclotomic](i, x), i=1..n)):
seq(T(n), n=0..10); # Alois P. Heinz, Jul 15 2022
PROG
(PARI) row(n) = Vec(prod(k=1, n, polcyclo(k, x))); \\ Michel Marcus, May 24 2019
CROSSREFS
KEYWORD
sign,tabf
AUTHOR
Benoit Cloitre, Oct 20 2002
EXTENSIONS
Keyword tabf from Michel Marcus, May 24 2019
STATUS
approved