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 A134867 #27 Oct 30 2023 11:56:41 %S A134867 1,3,1,5,2,1,8,4,2,1,10,5,3,2,1,14,8,5,3,2,1,16,9,6,4,3,2,1,20,12,8,6, %T A134867 4,3,2,1,23,14,10,7,5,4,3,2,1,27,17,12,9,7,5,4,3,2,1,29,18,13,10,8,6, %U A134867 5,4,3,2,1,35,23,17,13,10,8,6,5,4,3,2,1,37,24,18,14,11,9,7,6,5,4,3,2,1 %N A134867 A010766 * A000012. %F A134867 A010766 * A000012 as infinite lower triangular matrices. %F A134867 Triangle read by rows, partial row sums of A010766 starting fromt the right. %F A134867 G.f. of column k: 1/(1-x) * Sum_{j>=1} x^(k*j)/(1-x^j) = 1/(1-x) * Sum_{j>=k} x^j/(1-x^j). - _Seiichi Manyama_, Oct 30 2023 %e A134867 First few rows of the triangle: %e A134867 1; %e A134867 3, 1; %e A134867 5, 2, 1; %e A134867 8, 4, 2, 1; %e A134867 10, 5, 3, 2, 1; %e A134867 14, 8, 5, 3, 2, 1; %e A134867 16, 9, 6, 4, 3, 2, 1; %e A134867 20, 12, 8, 6, 4, 3, 2, 1; %e A134867 23, 14, 10, 7, 5, 4, 3, 2, 1; %e A134867 27, 17, 12, 9, 7, 5, 4, 3, 2, 1; %e A134867 ... %t A134867 t = Table[Sum[Floor[n/h], {h, k, n}], {n, 0, 10}, {k, 1, n}]; %t A134867 u = Flatten[t] (* A134867 array *) %t A134867 TableForm[t] (* A134867 sequence *) %t A134867 (* _Clark Kimberling_, Oct 11 2014 *) %o A134867 (PARI) T(n, k) = sum(j=k, n, n\j); \\ _Seiichi Manyama_, Oct 30 2023 %Y A134867 Column k=1..4 give: A006218, A002541, A366968, A366972. %Y A134867 Row sums give A024916. %Y A134867 Cf. A010766, A135539. %K A134867 nonn,tabl %O A134867 1,2 %A A134867 _Gary W. Adamson_, Nov 14 2007 %E A134867 More terms from _Seiichi Manyama_, Oct 30 2023