# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a337259 Showing 1-1 of 1 %I A337259 #14 Sep 28 2020 21:36:13 %S A337259 1,2,1,1,3,1,2,2,1,1,1,1,4,1,3,2,2,3,1,1,1,2,1,2,1,2,1,1,1,1,1,1,5,1, %T A337259 4,2,3,3,2,4,1,1,1,3,1,2,2,2,1,2,1,3,1,2,2,1,3,1,1,1,1,1,2,1,1,2,1,1, %U A337259 2,1,1,2,1,1,1,1,1,1,1,1 %N A337259 Compositions, sorted by increasing sum, increasing length and decreasing colexicographical order. %e A337259 The first 5 rows are: %e A337259 (1), %e A337259 (2), (1, 1), %e A337259 (3), (1, 2), (2, 1), (1, 1, 1), %e A337259 (4), (1, 3), (2, 2), (3, 1), (1, 1, 2), (1, 2, 1), (2, 1, 1), (1, 1, 1, 1), %e A337259 (5), (1, 4), (2, 3), (3, 2), (4, 1), (1, 1, 3), (1, 2, 2), (2, 1, 2), (1, 3, 1), (2, 2, 1), (3, 1, 1), (1, 1, 1, 2), (1, 1, 2, 1), (1, 2, 1, 1), (2, 1, 1, 1), (1, 1, 1, 1, 1). %p A337259 List := proc(n) %p A337259 local i, j, k, L: %p A337259 L := []: %p A337259 for i from 1 to n do %p A337259 for j from 1 to i do %p A337259 L := [op(L), op(ListTools:-Reverse([op(combinat:-composition(i, j))]))]: %p A337259 od: %p A337259 od: %p A337259 for k from 1 to numelems(L) do L[k] := ListTools:-Reverse(L[k]): od: %p A337259 L: %p A337259 end: %Y A337259 Cf. A124734 (increasing length, then lexicographic). %Y A337259 Cf. A296774 (increasing length, then reverse lexicographic). %Y A337259 Cf. A337243 (increasing length, then colexicographic). %Y A337259 Cf. A296773 (decreasing length, then lexicographic). %Y A337259 Cf. A296772 (decreasing length, then reverse lexicographic). %Y A337259 Cf. A337260 (decreasing length, then colexicographic). %Y A337259 Cf. A108244 (decreasing length, then reverse colexicographic). %Y A337259 Cf. A228369 (lexicographic). %Y A337259 Cf. A066099 (reverse lexicographic). %Y A337259 Cf. A228525 (colexicographic). %Y A337259 Cf. A228351 (reverse colexicographic). %K A337259 nonn,tabf %O A337259 1,2 %A A337259 _Lorenzo Sauras Altuzarra_, Aug 21 2020 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE