cp's OEIS Frontend

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.

A134392 A077028 * A000012, that is Rascal's triangle (as matrix) multiplied by a lower triangular matrix of ones (main diagonal of ones included).

This page as a plain text file.
%I A134392 #19 Mar 25 2022 03:03:32
%S A134392 1,2,1,4,3,1,8,7,4,1,15,14,10,5,1,26,25,20,13,6,1,42,41,35,26,16,7,1,
%T A134392 64,63,56,45,32,19,8,1,93,92,84,71,55,38,22,9,1,130,129,120,105,86,65,
%U A134392 44,25,10,1,176,175,165,148,126,101,75,50,28,11,1
%N A134392 A077028 * A000012, that is Rascal's triangle (as matrix) multiplied by a lower triangular matrix of ones (main diagonal of ones included).
%C A134392 Left border = A000125.
%C A134392 Row sums = A134393.
%F A134392 A077028 * A000012 as infinite lower triangular matrices.
%F A134392 Triangle read by rows, partial sums starting from the right of A077028.
%e A134392 First few rows of the triangle:
%e A134392    1;
%e A134392    2,  1;
%e A134392    4,  3,  1;
%e A134392    8,  7,  4,  1;
%e A134392   15, 14, 10,  5,  1;
%e A134392   26, 25, 20, 13,  6,  1;
%e A134392   42, 41, 35, 26, 16,  7,  1;
%e A134392   ...
%t A134392 rows = 11;
%t A134392 R[n_, k_] /; k <= n := k (n - k) + 1; R[0, 0] = 1; R[_, _] = 0;
%t A134392 MR = Table[R[n, k], {n, 0, rows-1}, {k, 0, rows-1}];
%t A134392 MB = Table[Boole[0 <= k <= n], {n, 0, rows-1}, {k, 0, rows -1}];
%t A134392 T = MR.MB;
%t A134392 Table[T[[n, k]], {n, 1, rows}, {k, 1, n}] // Flatten (* _Jean-François Alcover_, Apr 01 2020 *)
%Y A134392 Cf. A077028, A000125, A134393.
%K A134392 nonn,tabl
%O A134392 1,2
%A A134392 _Gary W. Adamson_, Oct 23 2007
%E A134392 Typos corrected by _Jean-François Alcover_, Apr 01 2020