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 A141674 #24 Jan 05 2024 14:58:04 %S A141674 1,4,2,6,0,2,12,6,0,3,10,0,0,0,2,24,12,8,0,0,4,14,0,0,0,0,0,2,32,16,0, %T A141674 8,0,0,0,4,27,0,9,0,0,0,0,0,3,40,20,0,0,8,0,0,0,0,4,22,0,0,0,0,0,0,0, %U A141674 0,0,2,72,36,24,18,0,12,0,0,0,0,0,6,26,0,0,0,0,0,0,0,0,0,0,0,2,56,28,0,0,0,0,8,0,0,0,0,0,0,4 %N A141674 Triangle T(n,m) read by rows: T(n,m) = sigma_0(n) * A126988(n,m). %C A141674 Row sums are {1, 6, 8, 21, 12, 48, 16, 60, 39, 72}. %H A141674 G. C. Greubel, <a href="/A141674/b141674.txt">Rows n = 1..100 of triangle, flattened</a> %F A141674 T(n,m) = sigma_0(n) * A126988(n,m). %F A141674 T(n,m) = sigma_0(n) * if(m = 1, n, if(n mod m = 0, n/m, 0)). %e A141674 Triangle begins %e A141674 { 1}, %e A141674 { 4, 2}, %e A141674 { 6, 0, 2}, %e A141674 {12, 6, 0, 3}, %e A141674 {10, 0, 0, 0, 2}, %e A141674 {24, 12, 8, 0, 0, 4}, %e A141674 {14, 0, 0, 0, 0, 0, 2}, %e A141674 {32, 16, 0, 8, 0, 0, 0, 4}, %e A141674 {27, 0, 9, 0, 0, 0, 0, 0, 3}, %e A141674 {40, 20, 0, 0, 8, 0, 0, 0, 0, 4} %t A141674 t[n_, m_] = DivisorSigma[0, n]*If[m == 1, n, If[Mod[n, m] == 0, n/m, 0]]; Table[Table[t[n, m], {m, 1, n}], {n, 1, 10}]; Flatten[%] %Y A141674 Cf. A126988. %K A141674 nonn,tabl,easy,less %O A141674 1,2 %A A141674 _Roger L. Bagula_ and _Gary W. Adamson_, Sep 06 2008 %E A141674 Edited by the Associate Editors of the OEIS, Jun 10 2018