|
| |
|
|
A056023
|
|
Unique triangle such that (1) every positive integer occurs exactly once; (2) row n consists of n consecutive numbers; (3) odd-numbered rows are decreasing; (4) even-numbered rows are increasing; and (5) column 1 is increasing.
|
|
1
| |
|
|
1, 2, 3, 6, 5, 4, 7, 8, 9, 10, 15, 14, 13, 12, 11, 16, 17, 18, 19, 20, 21, 28, 27, 26, 25, 24, 23, 22, 29, 30, 31, 32, 33, 34, 35, 36, 45, 44, 43, 42, 41, 40, 39, 38, 37, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 66, 65, 64, 63, 62, 61, 60, 59, 58, 57, 56
(list; table; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| Self-inverse permutation of the natural numbers.
T(2*n-1,1)=A000217(2*n-1)=T(2*n,1)-1; T(2*n,4*n)=A000217(2*n)=T(2*n+1,4*n+1)-1. - Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com), Apr 25 2004
Mirror image of triangle in A056011 . [From Philippe DELEHAM (kolotoko(AT)wanadoo.fr), Apr 04 2009]
Contribution from Clark Kimberling, Feb 03 2011: (Start)
When formatted as a rectangle R, for m>1, the numbers n-1
and n+1 are neighbors (row, column, or diagonal) of R.
R(n,k)=n+(k+n-2)(k+n-1)/2 if n+k is odd;
R(n,k)=k+(n+k-2)(n+k-1)/2 if n+k is even.
Northwest corner:
1....2....6....7....15...16...28
3....5....8....14...17...27...30
4....9....13...18...26...31...43
10...12...19...25...32...42...49
11...20...24...33...41...50...62
(End)
|
|
|
LINKS
| Index entries for sequences that are permutations of the natural numbers
|
|
|
FORMULA
| T(n, k) = (n^2 - (n - 2*k)*(-1)^(n mod 2)) / 2 + n mod 2. - Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com), Apr 25 2004
|
|
|
EXAMPLE
| Triangle begins : 1 ; 2,3 ; 6,5,4 ; 7,8,9,10 ; 15,14,13,12,11 ; ... [From Philippe DELEHAM (kolotoko(AT)wanadoo.fr), Apr 04 2009]
|
|
|
MATHEMATICA
| (* As a rectangle: *)
r[n_, k_]:=n+(k+n-2)(k+n-1)/2/; OddQ[n+k];
r[n_, k_]:=k+(n+k-2)(n+k-1)/2/; EvenQ[n+k];
TableForm[Table[f[n, k], {n, 1, 10}, {k, 1, 15}]]
Table[r[n-k+1, k], {n, 14}, {k, n, 1, -1}]//Flatten
(* from Clark Kimberling, Feb 03 2011 *)
|
|
|
CROSSREFS
| Cf. A056011 [From Philippe DELEHAM (kolotoko(AT)wanadoo.fr), Apr 04 2009]
Sequence in context: A091556 A072298 A130686 * A133259 A120067 A089843
Adjacent sequences: A056020 A056021 A056022 * A056024 A056025 A056026
|
|
|
KEYWORD
| nonn,tabl,easy
|
|
|
AUTHOR
| Clark Kimberling (ck6(AT)evansville.edu), Aug 01 2000.
|
| |
|
|
