|
| |
|
|
A057559
|
|
Lexicographic ordering of NxNxNxN, where N={1,2,3,...}.
|
|
5
| |
|
|
1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 2, 1, 1, 1, 1, 1, 1, 3, 1, 1, 2, 2, 1, 1, 3, 1, 1, 2, 1, 2, 1, 2, 2, 1, 1, 3, 1, 1, 2, 1, 1, 2, 2, 1, 2, 1, 2, 2, 1, 1, 3, 1, 1, 1, 1, 1, 1, 4, 1, 1, 2, 3, 1, 1, 3, 2, 1, 1, 4, 1, 1, 2, 1, 3, 1, 2, 2, 2, 1, 2, 3, 1, 1, 3, 1, 2, 1, 3, 2, 1, 1, 4, 1, 1, 2, 1, 1, 3, 2, 1, 2, 2, 2, 1, 3, 1, 2, 2, 1, 2, 2, 2, 2, 1, 2, 3, 1, 1, 3, 1, 1, 2, 3, 1, 2, 1, 3, 2, 1, 1, 4, 1, 1, 1
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,8
|
|
|
EXAMPLE
| Flatten the list of ordered lattice points, (1,1,1,1) < (1,1,1,2) < (1,1,2,1) < ... as 1,1,1,1, 1,1,1,2, 1,1,2,1, ...
|
|
|
MATHEMATICA
| lexicographicLattice[{dim_, maxHeight_}]:= Flatten[Array[Sort@Flatten[(Permutations[#1]&)/@IntegerPartitions[#1+dim-1, {dim}], 1]&, maxHeight], 1]; Flatten@lexicographicLattice[{4, 4}]
(* by Peter Moses, Feb 10 2011 *)
|
|
|
CROSSREFS
| Cf. A057554, A057555, A057556, A057557, A057558, A186006.
Sequence in context: A023586 A023584 A015182 * A205375 A016010 A131713
Adjacent sequences: A057556 A057557 A057558 * A057560 A057561 A057562
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Clark Kimberling (ck6(AT)evansville.edu), Sep 07 2000
|
|
|
EXTENSIONS
| Extended by Clark Kimberling (ck6(AT)evansville.edu), Feb 10 2011
|
| |
|
|
