A274650 Triangle read by rows: T(n,k), (0 <= k <= n), in which each term is the least nonnegative integer such that no row, column, diagonal, or antidiagonal contains a repeated term.
0, 1, 2, 3, 0, 1, 2, 4, 3, 5, 5, 1, 0, 2, 3, 4, 3, 5, 1, 6, 7, 6, 7, 2, 0, 5, 4, 8, 8, 5, 9, 4, 7, 2, 10, 6, 7, 10, 8, 3, 0, 6, 9, 5, 4, 11, 6, 12, 7, 1, 8, 3, 10, 9, 13, 9, 8, 4, 11, 2, 0, 1, 12, 6, 7, 10, 10, 11, 7, 12, 4, 3, 2, 9, 8, 14, 13, 15, 12, 9, 10, 6, 8, 1, 0, 11, 7, 4, 16, 14, 17
Offset: 0
Examples
Triangle begins: 0; 1, 2; 3, 0, 1; 2, 4, 3, 5; 5, 1, 0, 2, 3; 4, 3, 5, 1, 6, 7; 6, 7, 2, 0, 5, 4, 8; 8, 5, 9, 4, 7, 2, 10, 6; 7, 10, 8, 3, 0, 6, 9, 5, 4; 11, 6, 12, 7, 1, 8, 3, 10, 9, 13; 9, 8, 4, 11, 2, 0, 1, 12, 6, 7, 10; 10, 11, 7, 12, 4, 3, 2, 9, 8, 14, 13, 15; 12, 9, 10, 6, 8, 1, 0, 11, 7, 4, 16, 14, 17; ... From _Omar E. Pol_, Jun 07 2017: (Start) The triangle may be reformatted as an isosceles triangle so that the zero sequence (A000004) appears in the central column (but note that this is NOT the way the triangle is constructed!): . . 0; . 1, 2; . 3, 0, 1; . 2, 4, 3, 5; . 5, 1, 0, 2, 3; . 4, 3, 5, 1, 6, 7; . 6, 7, 2, 0, 5, 4, 8; . 8, 5, 9, 4, 7, 2, 10, 6; . 7, 10, 8, 3, 0, 6, 9, 5, 4; ... (End)
Links
- Alois P. Heinz, Rows n = 0..200, flattened
- F. Michel Dekking, Jeffrey Shallit, and N. J. A. Sloane, Queens in exile: non-attacking queens on infinite chess boards, Electronic J. Combin., 27:1 (2020), #P1.52.
- Rémy Sigrist, Colored representation of the rows n = 0..999
- Rémy Sigrist, PARI program for A274650
- N. J. A. Sloane, Notes on A274650 and Proof by Non-Attacking Queens
Crossrefs
Cf. A000004 (middle diagonal).
Cf. A046092 (indices of the zeros).
Every diagonal and every column of the right triangle is a permutation of A001477.
Cf. A274651 is the same triangle but with 1 added to every entry.
Other sequences of the same family are A269526, A274528, A274820, A274821, A286297, A288530, A288531.
Cf. A288384.
Programs
-
Mathematica
(* function a274651[] is defined in A274651 *) (* computation of rows 0 ... n-1 *) a274650[n_] := a274651[n]-1 Flatten[a274650[13]] (* data *) TableForm[a274650[13]] (* triangle *) (* Hartmut F. W. Hoft, Jun 12 2017 *)
-
PARI
See Links section.
Formula
T(n,k) = A274651(n+1,k+1) - 1.
Comments