A080577 -id:A080577 - cp's OEIS frontend

A103921 Irregular triangle T(n,m) (n >= 0) read by rows: row n lists numbers of distinct parts of partitions of n in Abramowitz-Stegun order.

0, 1, 1, 1, 1, 2, 1, 1, 2, 1, 2, 1, 1, 2, 2, 2, 2, 2, 1, 1, 2, 2, 1, 2, 3, 1, 2, 2, 2, 1, 1, 2, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 2, 1, 1, 2, 2, 2, 1, 2, 3, 3, 2, 2, 2, 3, 2, 3, 1, 2, 3, 2, 2, 2, 2, 1, 1, 2, 2, 2, 2, 2, 3, 3, 2, 2, 3, 1, 2, 3, 3, 3, 3, 2, 2, 3, 2, 3, 2, 2, 3, 2, 2, 2, 2, 1, 1, 2, 2, 2, 2, 1, 2, 3

Offset: 0

Wolfdieter Lang, Mar 24 2005

T(n, m) is the number of distinct parts of the m-th partition of n in Abramowitz-Stegun order; n >= 0, m = 1..p(n) = A000041(n).
The row length sequence of this table is p(n)=A000041(n) (number of partitions).
In order to count distinct parts of a partition consider the partition as a set instead of a multiset. E.g., n=6: read [1,1,1,3] as {1,3} and count the elements, here 2.
Rows are the same as the rows of A115623, but in reverse order.
From Wolfdieter Lang, Mar 17 2011: (Start)
The number of 1s in row number n, n >= 1, is tau(n)=A000005(n), the number of divisors of n.
For the proof read off the divisors d(n,j), j=1..tau(n), from row number n of table A027750, and translate them to the tau(n) partitions d(n,1)^(n/d(n,1)), d(n,2)^(n/d(n,2)),..., d(n,tau(n))^(n/d(n,tau(n))).
See a comment by Giovanni Resta under A000005. (End)
From Gus Wiseman, May 20 2020: (Start)
The name is correct if integer partitions are read in reverse, so that the parts are weakly increasing. The non-reversed version is A334440.
Also the number of distinct parts of the n-th integer partition in lexicographic order (A193073).
Differs from the number of distinct parts in the n-th integer partition in (sum/length/revlex) order (A334439). For example, (6,2,2) has two distinct elements, while (1,4,5) has three.
(End)

			Triangle starts:
  0,
  1,
  1, 1,
  1, 2, 1,
  1, 2, 1, 2, 1,
  1, 2, 2, 2, 2, 2, 1,
  1, 2, 2, 1, 2, 3, 1, 2, 2, 2, 1,
  1, 2, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 2, 1,
  1, 2, 2, 2, 1, 2, 3, 3, 2, 2, 2, 3, 2, 3, 1, 2, 3, 2, 2, 2, 2, 1,
  1, 2, 2, 2, 2, ...
a(5,4)=2 from the fourth partition of 5 in the mentioned order, i.e., (1^2,3), which has two distinct parts, namely 1 and 3.

Robert Price, Table of n, a(n) for n = 0..9295 (first 25 rows).
M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, National Bureau of Standards Applied Math. Series 55, Tenth Printing, 1972, pp. 831-2.
Wolfdieter Lang, First 10 rows.
OEIS Wiki, Orderings of partitions
Wikiversity, Lexicographic and colexicographic order

Row sums are A000070.
Row lengths are A000041.
The lengths of these partitions are A036043.
The maxima of these partitions are A049085.
The version for non-reversed partitions is A334440.
The version for colex instead of lex is (also) A334440.
Lexicographically ordered reversed partitions are A026791.
Reversed partitions in Abramowitz-Stegun order are A036036.
Reverse-lexicographically ordered partitions are A080577.
Compositions in Abramowitz-Stegun order are A124734.
Cf. A001221, A036037, A112798, A115621, A115623, A185974, A193073, A228531, A334301, A334302, A334433, A334435, A334441.

Join@@Table[Length/@Union/@Sort[Reverse/@IntegerPartitions[n]],{n,0,8}] (* Gus Wiseman, May 20 2020 *)

a(n) = A001221(A185974(n)). - Gus Wiseman, May 20 2020

Edited by Franklin T. Adams-Watters, May 29 2006

A334434 Heinz number of the n-th integer partition in graded lexicographic order.

Original entry on oeis.org

1, 2, 4, 3, 8, 6, 5, 16, 12, 9, 10, 7, 32, 24, 18, 20, 15, 14, 11, 64, 48, 36, 27, 40, 30, 25, 28, 21, 22, 13, 128, 96, 72, 54, 80, 60, 45, 50, 56, 42, 35, 44, 33, 26, 17, 256, 192, 144, 108, 81, 160, 120, 90, 100, 75, 112, 84, 63, 70, 49, 88, 66, 55, 52, 39, 34, 19

Offset: 0

Gus Wiseman, May 01 2020

A permutation of the positive integers.
This is the graded reverse of the so-called "Mathematica" order (A080577, A129129).
The Heinz number of an integer partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k). This gives a bijective correspondence between positive integers and integer partitions.
As a triangle with row lengths A000041, the sequence starts {{1},{2},{4,3},{8,6,5},...}, so offset is 0.

			The sequence of terms together with their prime indices begins:
    1: {}              11: {5}                 45: {2,2,3}
    2: {1}             64: {1,1,1,1,1,1}       50: {1,3,3}
    4: {1,1}           48: {1,1,1,1,2}         56: {1,1,1,4}
    3: {2}             36: {1,1,2,2}           42: {1,2,4}
    8: {1,1,1}         27: {2,2,2}             35: {3,4}
    6: {1,2}           40: {1,1,1,3}           44: {1,1,5}
    5: {3}             30: {1,2,3}             33: {2,5}
   16: {1,1,1,1}       25: {3,3}               26: {1,6}
   12: {1,1,2}         28: {1,1,4}             17: {7}
    9: {2,2}           21: {2,4}              256: {1,1,1,1,1,1,1,1}
   10: {1,3}           22: {1,5}              192: {1,1,1,1,1,1,2}
    7: {4}             13: {6}                144: {1,1,1,1,2,2}
   32: {1,1,1,1,1}    128: {1,1,1,1,1,1,1}    108: {1,1,2,2,2}
   24: {1,1,1,2}       96: {1,1,1,1,1,2}       81: {2,2,2,2}
   18: {1,2,2}         72: {1,1,1,2,2}        160: {1,1,1,1,1,3}
   20: {1,1,3}         54: {1,2,2,2}          120: {1,1,1,2,3}
   15: {2,3}           80: {1,1,1,1,3}         90: {1,2,2,3}
   14: {1,4}           60: {1,1,2,3}          100: {1,1,3,3}
Triangle begins:
    1
    2
    4   3
    8   6   5
   16  12   9  10   7
   32  24  18  20  15  14  11
   64  48  36  27  40  30  25  28  21  22  13
  128  96  72  54  80  60  45  50  56  42  35  44  33  26  17
  ...
This corresponds to the tetrangle:
                  0
                 (1)
               (11)(2)
             (111)(21)(3)
        (1111)(211)(22)(31)(4)
  (11111)(2111)(221)(311)(32)(41)(5)

Alois P. Heinz, Rows n = 0..28, flattened
OEIS Wiki, Orderings of partitions
Wikiversity, Lexicographic and colexicographic order

Row lengths are A000041.
The dual version (sum/revlex) is A129129.
The constructive version is A193073.
Compositions under the same order are A228351.
The length-sensitive version is A334433.
The version for reversed (weakly increasing) partitions is A334437.
Lexicographically ordered reversed partitions are A026791.
Reversed partitions in Abramowitz-Stegun order (sum/length/lex) are A036036.
Reverse-lexicographically ordered partitions are A080577.
Sorting reversed partitions by Heinz number gives A112798.
Graded Heinz numbers are A215366.
Sorting partitions by Heinz number gives A296150.
Row sums give A145519.
Cf. A036037, A049085, A056239, A066099, A185974, A211992, A228100, A228531, A333219, A334301, A334302, A334435, A334436, A334438, A334439.

T:= n-> map(p-> mul(ithprime(i), i=p), combinat[partition](n))[]:
seq(T(n), n=0..8);  # Alois P. Heinz, Jan 26 2025

lexsort[f_,c_]:=OrderedQ[PadRight[{f,c}]];
Join@@Table[Times@@Prime/@#&/@Sort[IntegerPartitions[n],lexsort],{n,0,8}]
- or -
Join@@Table[Times@@Prime/@#&/@Reverse[IntegerPartitions[n]],{n,0,8}]

A001222(a(n)) appears to be A049085(n).

A334436 Heinz numbers of all reversed integer partitions sorted first by sum and then reverse-lexicographically.

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 8, 7, 9, 10, 12, 16, 11, 15, 14, 18, 20, 24, 32, 13, 25, 21, 27, 22, 30, 28, 36, 40, 48, 64, 17, 35, 33, 45, 26, 50, 42, 54, 44, 60, 56, 72, 80, 96, 128, 19, 49, 55, 39, 75, 63, 81, 34, 70, 66, 90, 52, 100, 84, 108, 88, 120, 112, 144, 160, 192, 256

Offset: 0

Gus Wiseman, May 02 2020

First differs from A334435 at a(22) = 27, A334435(22) = 22.
A permutation of the positive integers.
Reversed integer partitions are finite weakly increasing sequences of positive integers. For non-reversed partitions, see A129129 and A228531.
This is the so-called "Mathematica" order (A080577).
The Heinz number of an integer partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k). This gives a bijective correspondence between positive integers and integer partitions.

			The sequence of terms together with their prime indices begins:
    1: {}            32: {1,1,1,1,1}       42: {1,2,4}
    2: {1}           13: {6}               54: {1,2,2,2}
    3: {2}           25: {3,3}             44: {1,1,5}
    4: {1,1}         21: {2,4}             60: {1,1,2,3}
    5: {3}           27: {2,2,2}           56: {1,1,1,4}
    6: {1,2}         22: {1,5}             72: {1,1,1,2,2}
    8: {1,1,1}       30: {1,2,3}           80: {1,1,1,1,3}
    7: {4}           28: {1,1,4}           96: {1,1,1,1,1,2}
    9: {2,2}         36: {1,1,2,2}        128: {1,1,1,1,1,1,1}
   10: {1,3}         40: {1,1,1,3}         19: {8}
   12: {1,1,2}       48: {1,1,1,1,2}       49: {4,4}
   16: {1,1,1,1}     64: {1,1,1,1,1,1}     55: {3,5}
   11: {5}           17: {7}               39: {2,6}
   15: {2,3}         35: {3,4}             75: {2,3,3}
   14: {1,4}         33: {2,5}             63: {2,2,4}
   18: {1,2,2}       45: {2,2,3}           81: {2,2,2,2}
   20: {1,1,3}       26: {1,6}             34: {1,7}
   24: {1,1,1,2}     50: {1,3,3}           70: {1,3,4}
Triangle begins:
   1
   2
   3   4
   5   6   8
   7   9  10  12  16
  11  15  14  18  20  24  32
  13  25  21  27  22  30  28  36  40  48  64
  17  35  33  45  26  50  42  54  44  60  56  72  80  96 128
This corresponds to the following tetrangle:
                  0
                 (1)
               (2)(11)
             (3)(12)(111)
        (4)(22)(13)(112)(1111)
  (5)(23)(14)(122)(113)(1112)(11111)

Wikiversity, Lexicographic and colexicographic order

Row lengths are A000041.
Compositions under the same order are A066099 (triangle).
The version for non-reversed partitions is A129129.
The constructive version is A228531.
The lengths of these partitions are A333486.
The length-sensitive version is A334435.
The dual version (sum/lex) is A334437.
Lexicographically ordered reversed partitions are A026791.
Reversed partitions in Abramowitz-Stegun (sum/length/lex) order are A036036.
Partitions in increasing-length colexicographic order (sum/length/colex) are A036037.
Reverse-lexicographically ordered partitions are A080577.
Sorting reversed partitions by Heinz number gives A112798.
Graded lexicographically ordered partitions are A193073.
Partitions in colexicographic order (sum/colex) are A211992.
Graded Heinz numbers are A215366.
Sorting partitions by Heinz number gives A296150.
Partitions in dual Abramowitz-Stegun (sum/length/revlex) order are A334439.
Cf. A056239, A124734, A185974, A228100, A333219, A334301, A334302, A334433, A334434, A334438.

lexsort[f_,c_]:=OrderedQ[PadRight[{f,c}]];
Table[Times@@Prime/@#&/@Reverse[Sort[Sort/@IntegerPartitions[n],lexsort]],{n,0,8}]

A001222(a(n)) = A333486(n).

A115623 Irregular triangle read by rows: row n lists numbers of distinct parts of partitions of n in Mathematica order.

Original entry on oeis.org

0, 1, 1, 1, 1, 2, 1, 1, 2, 1, 2, 1, 1, 2, 2, 2, 2, 2, 1, 1, 2, 2, 2, 1, 3, 2, 1, 2, 2, 1, 1, 2, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 2, 1, 1, 2, 2, 2, 2, 3, 2, 1, 3, 2, 3, 2, 2, 2, 3, 3, 2, 1, 2, 2, 2, 1, 1, 2, 2, 2, 2, 3, 2, 2, 3, 2, 3, 2, 2, 3, 3, 3, 3, 2, 1, 3, 2, 2, 3, 3, 2, 2, 2, 2, 2, 1, 1, 2, 2, 2, 2, 3, 2, 2

Offset: 0

Franklin T. Adams-Watters, Jan 25 2006

The row length sequence of this table is p(n)=A000041(n) (number of partitions).
In order to count distinct parts of a partition consider the partition as a set instead of a multiset. E.g., n=6: read [3,1,1,1] as {1,3} and count the elements, here 2.
Rows are the same as the rows of A103921, but in reverse order.

			Triangle starts:
0
1
1, 1
1, 2, 1
1, 2, 1, 2, 1
1, 2, 2, 2, 2, 2, 1
1, 2, 2, 2, 1, 3, 2, 1, 2, 2, 1
1, 2, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 2, 1
1, 2, 2, 2, 2, 3, 2, 1, 3, 2, 3, 2, 2, 2, 3, 3, 2, 1, 2, 2, 2, 1
1, 2, 2, 2, 2, 3, 2, 2, ...
a(5,4)=2 from the fourth partition of 5 in the mentioned order, i.e., [3,1^2], which has two distinct parts, namely 1 and 3.

Robert Price, Table of n, a(n) for n = 0..9295 (25 rows).

Cf. A080577, A000041, A103921, A115622, row sums A000070.

Table[Length /@ Union /@ IntegerPartitions[n], {n, 0, 8}] // Flatten  (* Robert Price, Jun 11 2020 *)

a(n, m) = number of distinct parts of the m-th partition of n in Mathematica order; n >= 0, m = 1..p(n) = A000041(n).

Edited and corrected by Franklin T. Adams-Watters, May 29 2006

A334437 Heinz number of the n-th reversed integer partition in graded lexicographical order.

Original entry on oeis.org

1, 2, 4, 3, 8, 6, 5, 16, 12, 10, 9, 7, 32, 24, 20, 18, 14, 15, 11, 64, 48, 40, 36, 28, 30, 22, 27, 21, 25, 13, 128, 96, 80, 72, 56, 60, 44, 54, 42, 50, 26, 45, 33, 35, 17, 256, 192, 160, 144, 112, 120, 88, 108, 84, 100, 52, 90, 66, 70, 34, 81, 63, 75, 39, 55, 49, 19

Offset: 0

Gus Wiseman, May 03 2020

A permutation of the positive integers.
Reversed integer partitions are finite weakly increasing sequences of positive integers. The non-reversed version is A334434.
This is the graded reverse of the so-called "Mathematica" order (A080577, A129129).
The Heinz number of a reversed integer partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k). This gives a bijective correspondence between positive integers and reversed partitions.
Also Heinz numbers of partitions in colexicographic order (cf. A211992).
As a triangle with row lengths A000041, the sequence starts {{1},{2},{4,3},{8,6,5},...}, so offset is 0.

			The sequence of terms together with their prime indices begins:
    1: {}              11: {5}                 44: {1,1,5}
    2: {1}             64: {1,1,1,1,1,1}       54: {1,2,2,2}
    4: {1,1}           48: {1,1,1,1,2}         42: {1,2,4}
    3: {2}             40: {1,1,1,3}           50: {1,3,3}
    8: {1,1,1}         36: {1,1,2,2}           26: {1,6}
    6: {1,2}           28: {1,1,4}             45: {2,2,3}
    5: {3}             30: {1,2,3}             33: {2,5}
   16: {1,1,1,1}       22: {1,5}               35: {3,4}
   12: {1,1,2}         27: {2,2,2}             17: {7}
   10: {1,3}           21: {2,4}              256: {1,1,1,1,1,1,1,1}
    9: {2,2}           25: {3,3}              192: {1,1,1,1,1,1,2}
    7: {4}             13: {6}                160: {1,1,1,1,1,3}
   32: {1,1,1,1,1}    128: {1,1,1,1,1,1,1}    144: {1,1,1,1,2,2}
   24: {1,1,1,2}       96: {1,1,1,1,1,2}      112: {1,1,1,1,4}
   20: {1,1,3}         80: {1,1,1,1,3}        120: {1,1,1,2,3}
   18: {1,2,2}         72: {1,1,1,2,2}         88: {1,1,1,5}
   14: {1,4}           56: {1,1,1,4}          108: {1,1,2,2,2}
   15: {2,3}           60: {1,1,2,3}           84: {1,1,2,4}
Triangle begins:
    1
    2
    4   3
    8   6   5
   16  12  10   9   7
   32  24  20  18  14  15  11
   64  48  40  36  28  30  22  27  21  25  13
  128  96  80  72  56  60  44  54  42  50  26  45  33  35  17
This corresponds to the following tetrangle:
                  0
                 (1)
               (11)(2)
             (111)(12)(3)
        (1111)(112)(13)(22)(4)
  (11111)(1112)(113)(122)(14)(23)(5)

Wikiversity, Lexicographic and colexicographic order

Row lengths are A000041.
The constructive version is A026791 (triangle).
The length-sensitive version is A185974.
Compositions under the same order are A228351 (triangle).
The version for non-reversed partitions is A334434.
The dual version (sum/revlex) is A334436.
Reversed partitions in Abramowitz-Stegun (sum/length/lex) order are A036036.
Partitions in increasing-length colexicographic order (sum/length/colex) are A036037.
Graded reverse-lexicographically ordered partitions are A080577.
Sorting reversed partitions by Heinz number gives A112798.
Graded lexicographically ordered partitions are A193073.
Partitions in colexicographic order (sum/colex) are A211992.
Graded Heinz numbers are given by A215366.
Sorting partitions by Heinz number gives A296150.
Partitions in dual Abramowitz-Stegun (sum/length/revlex) order are A334439.
Cf. A056239, A066099, A129129, A228531, A333219, A333220, A334301, A334302, A334433, A334435, A334438.

lexsort[f_,c_]:=OrderedQ[PadRight[{f,c}]];
Table[Times@@Prime/@#&/@Sort[Sort/@IntegerPartitions[n],lexsort],{n,0,8}]

A001222(a(n)) = A193173(n).

A078760 Combinations of a partition: number of ways to label a partition (of size n) with numbers 1 to n.

Original entry on oeis.org

1, 1, 1, 2, 1, 3, 6, 1, 4, 6, 12, 24, 1, 5, 10, 20, 30, 60, 120, 1, 6, 15, 30, 20, 60, 120, 90, 180, 360, 720, 1, 7, 21, 42, 35, 105, 210, 140, 210, 420, 840, 630, 1260, 2520, 5040, 1, 8, 28, 56, 56, 168, 336, 70, 280, 420, 840, 1680, 560, 1120, 1680, 3360, 6720, 2520

Offset: 0

Franklin T. Adams-Watters, Jan 08 2003

This is a function of the individual partitions of an integer. The number of values in each line is given by A000041; thus lines 0 to 5 of the sequence are (1), (1), (1,2), (1,3,6), (1,4,6,12,24). The partitions in each line are ordered with the largest part sizes first, so the line 4 indices are [4], [3,1], [2,2], [2,1,1] and [1,1,1,1]. Note that exponents are often used to represent repeated values in a partition, so the last index could instead be written [1^4]. The combination function (sequence A007318) C(n,m) = C([m,n-m]).

This sequence is also the sequence of multinomial coefficients for partitions ordered lexicographically, matching partition sequence A080577. This is different ordering than in sequence A036038 of multinomial coefficients. - Sergei Viznyuk, Mar 15 2012

			The irregular table starts:
  [0] {1},
  [1] {1},
  [2] {1, 2},
  [3] {1, 3,  6},
  [4] {1, 4,  6, 12, 24},
  [5] {1, 5, 10, 20, 30, 60, 120},
  [6] {1, 6, 15, 30, 20, 60, 120, 90, 180, 360, 720}
  ...
C([2,1]) = 3 for the labelings ({1,2},{3}), ({1,3},{2}) and ({2,3},{2}).

T. D. Noe, Rows n=0..25 of triangle, flattened
S.-H. Cha, E. G. DuCasse, and L. V. Quintas, Graph Invariants Based on the Divides Relation and Ordered by Prime Signatures, arxiv:1405.5283 [math.NT], 2014.
Sergei Viznyuk, C Program
Index entries for triangles and arrays related to Pascal's triangle.

Different from A036038.

Cf. A000041, A008480, A063008, A080577.

g:= n-> (l-> add(i, i=l)!/mul(i!, i=l))(map(i-> i[2], ifactors(n)[2])):
b:= (n, i)-> `if`(n=0 or i=1, [[1$n]], [map(x->
    [i, x[]], b(n-i, min(n-i, i)))[], b(n, i-1)[]]):
T:= n-> map(x-> g(mul(ithprime(i)^x[i], i=1..nops(x))), b(n$2))[]:
seq(T(n), n=0..9);  # Alois P. Heinz, Mar 25 2020

Flatten[Table[Apply[Multinomial, IntegerPartitions[i], {1}], {i,0,25}]] (* T. D. Noe, Oct 14 2007 *)
Flatten[ Multinomial @@@ IntegerPartitions @ # & /@ Range[ 0, 8]] (* Michael Somos, Feb 05 2011 *)
g[n_] := With[{ee = FactorInteger[n][[All, 2]]}, Total[ee]!/Times@@(ee!)];
b[n_, i_] := b[n, i] = If[n == 0 || i == 1, {Table[1, {n}]}, Join[ Prepend[#, i] & /@ b[n - i, Min[n - i, i]], b[n, i - 1]]];
row[n_] := Product[Prime[i]^#[[i]], {i, 1, Length[#]}] & /@ b[n, n];
T[n_] := g /@ row[n];
T /@ Range[0, 9] // Flatten (* Jean-François Alcover, Jun 09 2021, after Alois P. Heinz *)

C(sig)={vecsum(sig)!/vecprod(apply(k->k!, sig))}
Row(n)={apply(C, vecsort([Vecrev(p) | p<-partitions(n)], , 4))}
{ for(n=0, 8, print(Row(n))) }  \\ Andrew Howroyd, Mar 25 2020

def A070289_row(n): return [multinomial(x) for x in Partitions(n)]
print(flatten([A070289_row(n) for n in range(8)]))  # Peter Luschny, Jun 24 2025

C([]) = (Sum a(i))! / Product a(i) !.

T(n,k) = A008480(A063008(n,k)). - Andrew Howroyd, Mar 25 2020

A118457 Table of partitions of n into distinct parts, in Mathematica ordering.

Original entry on oeis.org

1, 2, 3, 2, 1, 4, 3, 1, 5, 4, 1, 3, 2, 6, 5, 1, 4, 2, 3, 2, 1, 7, 6, 1, 5, 2, 4, 3, 4, 2, 1, 8, 7, 1, 6, 2, 5, 3, 5, 2, 1, 4, 3, 1, 9, 8, 1, 7, 2, 6, 3, 6, 2, 1, 5, 4, 5, 3, 1, 4, 3, 2, 10, 9, 1, 8, 2, 7, 3, 7, 2, 1, 6, 4, 6, 3, 1, 5, 4, 1, 5, 3, 2, 4, 3, 2, 1, 11, 10, 1, 9, 2, 8, 3, 8, 2, 1, 7, 4, 7, 3, 1, 6, 5

Offset: 1

Franklin T. Adams-Watters, Apr 28 2006

Reverse lexicographic order where the partitions are reprepresented as (weakly) decreasing lists of parts. [Joerg Arndt, Jan 25 2013]

			The partitions of 5 into distinct parts are [5], [4,1] and [3,2], so row 5 is 5,4,1,3,2.
1;
2;
3; 2,1;
4; 3,1;
5; 4,1; 3,2;
6; 5,1; 4,2; 3,2,1;
7; 6,1; 5,2; 4,3; 4,2,1;
8; 7,1; 6,2; 5,3; 5,2,1; 4,3,1;
9; 8,1; 7,2; 6,3; 6,2,1; 5,4; 5,3,1; 4,3,2;
10; 9,1; 8,2; 7,3; 7,2,1; 6,4; 6,3,1; 5,4,1; 5,3,2; 4,3,2,1;
11; 10,1; 9,2; 8,3; 8,2,1; 7,4; 7,3,1; 6,5; 6,4,1; 6,3,2; 5,4,2; 5,3,2,1;

Alois P. Heinz, Rows n = 1..32, flattened

Cf. A026793, A118459 (partition lengths), A015723 (total row lengths), A080577, A000009, A246688.

d[n_] := Select[IntegerPartitions[n], Max[Length /@ Split@ #] == 1 &]; Flatten[Table[d[n], {n, 15}]] (* Clark Kimberling, Mar 11 2012 *)

def StrictPartitions(n): return [partition for partition in Partitions(n) if Set(partition.to_exp()).issubset(Set([0,1]))]
def A118457row(n): return [p for parts in StrictPartitions(n) for p in parts]
for n in (1..9): print(A118457row(n)) # Peter Luschny, Apr 11 2020

A334442 Irregular triangle whose reversed rows are all integer partitions sorted first by sum, then by length, and finally reverse-lexicographically.

Original entry on oeis.org

1, 2, 1, 1, 3, 1, 2, 1, 1, 1, 4, 1, 3, 2, 2, 1, 1, 2, 1, 1, 1, 1, 5, 1, 4, 2, 3, 1, 1, 3, 1, 2, 2, 1, 1, 1, 2, 1, 1, 1, 1, 1, 6, 1, 5, 2, 4, 3, 3, 1, 1, 4, 1, 2, 3, 2, 2, 2, 1, 1, 1, 3, 1, 1, 2, 2, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 7, 1, 6, 2, 5, 3, 4, 1, 1, 5

Offset: 0

Gus Wiseman, May 07 2020

First differs from A036036 for reversed partitions of 9. Namely, this sequence has (2,2,5) before (1,4,4), while A036036 has (1,4,4) before (2,2,5).

			The sequence of all partitions begins:
  ()         (2,3)        (1,1,1,1,2)    (1,1,1,2,2)
  (1)        (1,1,3)      (1,1,1,1,1,1)  (1,1,1,1,1,2)
  (2)        (1,2,2)      (7)            (1,1,1,1,1,1,1)
  (1,1)      (1,1,1,2)    (1,6)          (8)
  (3)        (1,1,1,1,1)  (2,5)          (1,7)
  (1,2)      (6)          (3,4)          (2,6)
  (1,1,1)    (1,5)        (1,1,5)        (3,5)
  (4)        (2,4)        (1,2,4)        (4,4)
  (1,3)      (3,3)        (1,3,3)        (1,1,6)
  (2,2)      (1,1,4)      (2,2,3)        (1,2,5)
  (1,1,2)    (1,2,3)      (1,1,1,4)      (1,3,4)
  (1,1,1,1)  (2,2,2)      (1,1,2,3)      (2,2,4)
  (5)        (1,1,1,3)    (1,2,2,2)      (2,3,3)
  (1,4)      (1,1,2,2)    (1,1,1,1,3)    (1,1,1,5)
This sequence can also be interpreted as the following triangle:
                  0
                 (1)
               (2)(11)
             (3)(12)(111)
        (4)(13)(22)(112)(1111)
  (5)(14)(23)(113)(122)(1112)(11111)
Taking Heinz numbers (A334438) gives:
   1
   2
   3   4
   5   6   8
   7  10   9  12  16
  11  14  15  20  18  24  32
  13  22  21  25  28  30  27  40  36  48  64
  17  26  33  35  44  42  50  45  56  60  54  80  72  96 128

Wikiversity, Lexicographic and colexicographic order

Row lengths are A036043.
The version for reversed partitions is A334301.
The version for colex instead of revlex is A334302.
Taking Heinz numbers gives A334438.
The version with rows reversed is A334439.
Ignoring length gives A335122.
Lexicographically ordered reversed partitions are A026791.
Reversed partitions in Abramowitz-Stegun (sum/length/lex) order are A036036.
Partitions in increasing-length colex order (sum/length/colex) are A036037.
Reverse-lexicographically ordered partitions are A080577.
Lexicographically ordered partitions are A193073.
Partitions in colexicographic order (sum/colex) are A211992.
Sorting partitions by Heinz number gives A296150.
Cf. A026791, A112798, A124734, A129129, A185974, A228100, A228531, A296774, A334433, A334435, A334436.

revlensort[f_,c_]:=If[Length[f]!=Length[c],Length[f]

A334442_row(n)=vecsort(partitions(n),p->concat(#p,-Vecrev(p))) \\ Rows of triangle defined in EXAMPLE (all partitions of n). Wrap into [Vec(p)|p<-...] to avoid "Vecsmall". - M. F. Hasler, May 14 2020

A334441 Maximum part of the n-th integer partition in Abramowitz-Stegun (sum/length/lex) order; a(0) = 0.

Original entry on oeis.org

0, 1, 2, 1, 3, 2, 1, 4, 2, 3, 2, 1, 5, 3, 4, 2, 3, 2, 1, 6, 3, 4, 5, 2, 3, 4, 2, 3, 2, 1, 7, 4, 5, 6, 3, 3, 4, 5, 2, 3, 4, 2, 3, 2, 1, 8, 4, 5, 6, 7, 3, 4, 4, 5, 6, 2, 3, 3, 4, 5, 2, 3, 4, 2, 3, 2, 1, 9, 5, 6, 7, 8, 3, 4, 4, 5, 5, 6, 7, 3, 3, 4, 4, 5, 6, 2, 3, 3

Offset: 0

Gus Wiseman, May 06 2020

First differs from A049085 at a(8) = 2, A049085(8) = 3.

The parts of a partition are read in the usual (weakly decreasing) order. The version for reversed (weakly increasing) partitions is A049085.

			Triangle begins:
  0
  1
  2 1
  3 2 1
  4 2 3 2 1
  5 3 4 2 3 2 1
  6 3 4 5 2 3 4 2 3 2 1
  7 4 5 6 3 3 4 5 2 3 4 2 3 2 1
  8 4 5 6 7 3 4 4 5 6 2 3 3 4 5 2 3 4 2 3 2 1

Wikiversity, Lexicographic and colexicographic order

Row lengths are A000041.
The length of the same partition is A036043.
Ignoring partition length (sum/lex) gives A036043 also.
The version for reversed partitions is A049085.
a(n) is the maximum element in row n of A334301.
The number of distinct parts in the same partition is A334440.
Lexicographically ordered reversed partitions are A026791.
Reversed partitions in Abramowitz-Stegun (sum/length/lex) order are A036036.
Partitions in increasing-length colex order (sum/length/colex) are A036037.
Graded reverse-lexicographically ordered partitions are A080577.
Partitions counted by sum and number of distinct parts are A116608.
Graded lexicographically ordered partitions are A193073.
Partitions in colexicographic order (sum/colex) are A211992.
Partitions in dual Abramowitz-Stegun (sum/length/revlex) order are A334439.
Cf. A001221, A103921, A124734, A185974, A296774, A299755, A334302, A334433, A334434, A334435, A334438.

Table[If[n==0,{0},Max/@Sort[IntegerPartitions[n]]],{n,0,10}]

A227739 Irregular table where row n lists in nondecreasing order the parts of unordered partition encoded in the runlengths of binary expansion of n; nonzero terms of A227189.

Original entry on oeis.org

1, 1, 1, 2, 2, 2, 1, 1, 1, 1, 2, 3, 3, 3, 1, 2, 2, 1, 1, 1, 1, 2, 2, 2, 2, 3, 1, 1, 2, 1, 3, 4, 4, 4, 1, 3, 3, 1, 1, 2, 2, 2, 3, 3, 2, 2, 2, 2, 1, 1, 1, 1, 1, 1, 2, 2, 2, 3, 3, 3, 3, 4, 1, 2, 3, 1, 1, 1, 2, 2, 2, 3, 2, 4, 1, 1, 3, 1, 4, 5, 5, 5, 1, 4, 4, 1, 1

Offset: 1

Antti Karttunen, Jul 25 2013

Row n has A005811(n) elements. Each row contains a unique (unordered) partition of some integer, and all possible partitions of finite natural numbers eventually occur. The first partition that sums to k occurs at row A227368(k) and the last at row A000225(k).

Other similar tables of unordered partitions: A036036, A036037, A080576, A080577 and A112798.

			Rows are constructed as:
  Row    n in   Runlengths  With one     Partial sums   The row sums
   n    binary  collected   subtracted   of which give  to, i.e. is
                from lsb-   from all     terms on       a partition of
                to msb-end  except 1st   that row       of A227183(n)
   1       "1"        [1]        [1]     1;             1
   2      "10"      [1,1]      [1,0]     1, 1;          2
   3      "11"        [2]        [2]     2;             2
   4     "100"      [2,1]      [2,0]     2, 2;          4
   5     "101"    [1,1,1]    [1,0,0]     1, 1, 1;       3
   6     "110"      [1,2]      [1,1]     1, 2;          3
   7     "111"        [3]        [3]     3;             3
   8    "1000"      [3,1]      [3,0]     3, 3;          6
   9    "1001"    [1,2,1]    [1,1,0]     1, 2, 2;       5
  10    "1010"  [1,1,1,1]  [1,0,0,0]     1, 1, 1, 1;    4
  11    "1011"    [2,1,1]    [2,0,0]     2, 2, 2;       6
  12    "1100"      [2,2]      [2,1]     2, 3;          5
  13    "1101"    [1,1,2]    [1,0,1]     1, 1, 2;       4
  14    "1110"      [1,3]      [1,2]     1, 3;          4
  15    "1111"        [4]        [4]     4;             4
  16   "10000"      [4,1]      [4,0]     4, 4;          8

Antti Karttunen, The rows 1..1023 of the table, flattened

Row sums: A227183, row products: A227184, the initial (smallest) term of each row: A136480, the last (largest) term: A227185.

Cf. also A227189, A227738, A227736.

Table[Function[b, Accumulate@ Prepend[If[Length@ b > 1, Rest[b] - 1, {}], First@ b]]@ Map[Length, Split@ Reverse@ IntegerDigits[n, 2]], {n, 34}] // Flatten (* Michael De Vlieger, May 09 2017 *)

(define (A227739 n) (A227189bi (A227737 n) (A227740 n))) ;; The Scheme-code for A227189bi has been given in A227189.

a(n) = A227189(A227737(n),A227740(n)).

cp's OEIS Frontend

A103921 Irregular triangle T(n,m) (n >= 0) read by rows: row n lists numbers of distinct parts of partitions of n in Abramowitz-Stegun order.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

Extensions

A334434 Heinz number of the n-th integer partition in graded lexicographic order.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

Formula

A334436 Heinz numbers of all reversed integer partitions sorted first by sum and then reverse-lexicographically.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

A115623 Irregular triangle read by rows: row n lists numbers of distinct parts of partitions of n in Mathematica order.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

Extensions

A334437 Heinz number of the n-th reversed integer partition in graded lexicographical order.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

A078760 Combinations of a partition: number of ways to label a partition (of size n) with numbers 1 to n.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

PARI

SageMath

Formula

A118457 Table of partitions of n into distinct parts, in Mathematica ordering.

Views

Author

Keywords

Comments

Examples

Links