A127248 - OEIS

%I #6 Aug 04 2023 04:35:22

%S 1,-1,1,0,-1,1,0,0,0,1,0,0,0,-1,1,0,0,0,0,0,1,0,0,0,0,0,0,1,0,0,0,0,0,

%T 0,-1,1,0,0,0,0,0,0,0,-1,1,0,0,0,0,0,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,1,

%U 0,0,0,0,0,0,0,0,0,0,-1,1,0,0,0,0,0,0,0,0,0,0,0,0,1

%N Triangle whose k-th column is generated by (1-A010060(1+k)*x)*x^k.

%e Triangle begins:

%e   1;

%e   -1, 1;

%e   0, -1, 1;

%e   0, 0, 0, 1;

%e   0, 0, 0, -1, 1;

%e   0, 0, 0, 0, 0, 1;

%e   0, 0, 0, 0, 0, 0, 1;

%e   0, 0, 0, 0, 0, 0, -1, 1;

%e   0, 0, 0, 0, 0, 0, 0, -1, 1;

%e   0, 0, 0, 0, 0, 0, 0, 0, 0, 1;

%e   0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1;

%e   ...

%t T[n_, k_] := SeriesCoefficient[(1 - ThueMorse[1 + k]*x)*x^k, {x, 0, n}]; Table[T[n, k], {n, 0, 12}, {k, 0, n}] // Flatten (* _Amiram Eldar_, Aug 04 2023 *)

%Y Inverse is A127247.

%Y Row sums are 1-A010060(n).

%K easy,sign,tabl

%O 0,1

%A _Paul Barry_, Jan 10 2007

%E More terms from _Amiram Eldar_, Aug 04 2023