A076699 - OEIS

%I #8 Jun 22 2017 06:05:05

%S 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,

%T 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,

%U 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

%N T(n,k) = Table of coefficients of x^k in cyclotomic(n,x).

%H Andrey Zabolotskiy, <a href="/A076699/b076699.txt">Table of n, a(n) for n = 0..7380</a> (rows 0..120)

%e 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

%t Table[Drop[CoefficientList[x^(n+1)+Cyclotomic[n, x], x], -1], {n, 0, 7}]

%Y Row sums, apart from initial 1, equal A020500.

%Y A013595 and A013596 are the irregular-array versions of this array.

%K easy,sign,tabl

%O 0,5573

%A _Wouter Meeussen_, Oct 26 2002