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 A114002 #10 Sep 08 2023 12:01:42 %S A114002 1,2,1,2,0,1,2,2,0,1,2,0,0,0,1,2,2,2,0,0,1,2,0,0,0,0,0,1,2,2,0,2,0,0, %T A114002 0,1,2,0,2,0,0,0,0,0,1,2,2,0,0,2,0,0,0,0,1,2,0,0,0,0,0,0,0,0,0,1,2,2, %U A114002 2,2,0,2,0,0,0,0,0,1,2,0,0,0,0,0,0,0,0,0,0,0,1,2,2,0,0,0,0,2,0,0,0,0,0,0,1 %N A114002 Expansion of g.f. x^k(1+x^(k+1))/(1-x^(k+1)). %C A114002 Inverse is A114004. Row sums are A114003. %F A114002 Column k has g.f. x^k(1+x^(k+1))/(1-x^(k+1)). %F A114002 Equals 2*A051731 - I, I = Identity matrix. - _Gary W. Adamson_, Nov 07 2007 %e A114002 Triangle begins: %e A114002 1; %e A114002 2, 1; %e A114002 2, 0, 1; %e A114002 2, 2, 0, 1; %e A114002 2, 0, 0, 0, 1; %e A114002 2, 2, 2, 0, 0, 1; %e A114002 2, 0, 0, 0, 0, 0, 1; %e A114002 ... %t A114002 T[n_,k_]:=SeriesCoefficient[x^k(1+x^(k+1))/(1-x^(k+1)),{x,0,n}]; Table[T[n,k],{n,0,13},{k,0,n}] //Flatten (* _Stefano Spezia_, Sep 08 2023 *) %Y A114002 Cf. A051731, A114003, A114004. %K A114002 easy,nonn,tabl %O A114002 0,2 %A A114002 _Paul Barry_, Nov 12 2005