This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A127248 #6 Aug 04 2023 04:35:22 %S A127248 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 A127248 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 A127248 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 A127248 Triangle whose k-th column is generated by (1-A010060(1+k)*x)*x^k. %e A127248 Triangle begins: %e A127248 1; %e A127248 -1, 1; %e A127248 0, -1, 1; %e A127248 0, 0, 0, 1; %e A127248 0, 0, 0, -1, 1; %e A127248 0, 0, 0, 0, 0, 1; %e A127248 0, 0, 0, 0, 0, 0, 1; %e A127248 0, 0, 0, 0, 0, 0, -1, 1; %e A127248 0, 0, 0, 0, 0, 0, 0, -1, 1; %e A127248 0, 0, 0, 0, 0, 0, 0, 0, 0, 1; %e A127248 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1; %e A127248 ... %t A127248 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 A127248 Inverse is A127247. %Y A127248 Row sums are 1-A010060(n). %K A127248 easy,sign,tabl %O A127248 0,1 %A A127248 _Paul Barry_, Jan 10 2007 %E A127248 More terms from _Amiram Eldar_, Aug 04 2023