A168315
Triangle read by rows, A168313 * the diagonalized variant of its eigensequence, A168314.
Original entry on oeis.org
1, 0, 1, 0, 2, 1, 0, 0, 2, 3, 0, 0, 2, 6, 5, 0, 0, 0, 6, 10, 13, 0, 0, 0, 6, 10, 26, 29, 0, 0, 0, 0, 10, 26, 58, 71, 0, 0, 0, 0, 10, 26, 58, 142, 165, 0, 0, 0, 0, 0, 26, 58, 142, 330, 401, 0, 0, 0, 0, 0, 26, 58, 142, 330, 802, 957
Offset: 1
First few rows of the triangle =
1;
0, 1;
0, 2, 1;
0, 0, 2, 3;
0, 0, 2, 6, 5;
0, 0, 0, 6, 10, 13;
0, 0, 0, 6, 10, 26, 29;
0, 0, 0, 6, 10, 26, 58, 71;
0, 0, 0, 0, 10, 26, 58, 142, 165;
0, 0, 0, 0, 0, 26, 58, 142, 330, 401;
0, 0, 0, 0, 0, 26, 58, 142, 330, 802, 957;
0, 0, 0, 0, 0, 0, 58, 142, 330, 802, 1914, 2315;
0, 0, 0, 0, 0, 0, 58, 142, 330, 802, 1914, 4630, 5561;
...
A168313
Triangle read by rows, retain 1's as rightmost diagonal of A101688 and replace all other 1's with 2's.
Original entry on oeis.org
1, 0, 1, 0, 2, 1, 0, 0, 2, 1, 0, 0, 2, 2, 1, 0, 0, 0, 2, 2, 1, 0, 0, 0, 2, 2, 2, 1, 0, 0, 0, 0, 2, 2, 2, 1, 0, 0, 0, 0, 2, 2, 2, 2, 1, 0, 0, 0, 0, 0, 2, 2, 2, 2, 1, 0, 0, 0, 0, 0, 2, 2, 2, 2, 2, 1
Offset: 1
First few rows of the triangle =
1;
0, 1;
0, 2, 1;
0, 0, 2, 1;
0, 0, 2, 2, 1;
0, 0, 0, 2, 2, 1;
0, 0, 0, 2, 2, 2, 1;
0, 0, 0, 0, 2, 2, 2, 1;
0, 0, 0, 0, 2, 2, 2, 2, 1;
0, 0, 0, 0, 0, 2, 2, 2, 2, 1;
0, 0, 0, 0, 0, 2, 2, 2, 2, 2, 1;
0, 0, 0, 0, 0, 0, 2, 2, 2, 2, 2, 1;
...
-
rows = 11;
A = Array[Which[#1 == 1, 1, #1 <= #2, 2, True, 0]&, {rows, rows}];
Table[A[[i-j+1, j]], {i, 1, rows}, {j, 1, i}] // Flatten (* Jean-François Alcover, Aug 08 2018 *)
Showing 1-2 of 2 results.
Comments