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 A128219 #9 Feb 08 2022 19:24:47 %S A128219 1,2,2,2,3,3,2,3,4,4,2,3,4,5,5,2,3,4,5,6,6,2,3,4,5,6,7,7,2,3,4,5,6,7, %T A128219 8,8,2,3,4,5,6,7,8,9,9,2,3,4,5,6,7,8,9,10,10,2,3,4,5,6,7,8,9,10,11,11, %U A128219 2,3,4,5,6,7,8,9,10,11,12,12,2,3,4,5,6 %N A128219 A000012 * A127701. a(1) = 1, a(2) = 2, a(3) = 2; by rows, n-1 terms of 2, 3, 4, ... followed by "n". %F A128219 A000012 * A127701 as infinite lower triangular matrices. %e A128219 First few rows of the triangle: %e A128219 1; %e A128219 2, 2; %e A128219 2, 3, 3; %e A128219 2, 3, 4, 4; %e A128219 2, 3, 4, 5, 5; %e A128219 2, 3, 4, 5, 6, 6; %e A128219 2, 3, 4, 5, 6, 7, 7; %e A128219 ... %t A128219 trm[i_]:=Join[Range[2,i],{i}]; Flatten[Table[trm[n],{n,13}]] (* _Harvey P. Dale_, Nov 14 2012 *) %Y A128219 Cf. A000012, A127701, A034856 (row sums), A128220. %K A128219 nonn,tabl %O A128219 1,2 %A A128219 _Gary W. Adamson_, Feb 19 2007