A072233 -id:A072233 - cp's OEIS frontend

A340787 Heinz numbers of integer partitions of positive rank.

3, 5, 7, 10, 11, 13, 14, 15, 17, 19, 21, 22, 23, 25, 26, 28, 29, 31, 33, 34, 35, 37, 38, 39, 41, 42, 43, 44, 46, 47, 49, 51, 52, 53, 55, 57, 58, 59, 61, 62, 63, 65, 66, 67, 68, 69, 70, 71, 73, 74, 76, 77, 78, 79, 82, 83, 85, 86, 87, 88, 89, 91, 92, 93, 94, 95

Offset: 1

Gus Wiseman, Jan 29 2021

nonn

The Heinz number of a partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k), giving a bijective correspondence between positive integers and integer partitions.

The Dyson rank of a nonempty partition is its maximum part minus its length. The rank of an empty partition is undefined.

			The sequence of partitions together with their Heinz numbers begins:
     3: (2)      28: (4,1,1)    49: (4,4)      69: (9,2)
     5: (3)      29: (10)       51: (7,2)      70: (4,3,1)
     7: (4)      31: (11)       52: (6,1,1)    71: (20)
    10: (3,1)    33: (5,2)      53: (16)       73: (21)
    11: (5)      34: (7,1)      55: (5,3)      74: (12,1)
    13: (6)      35: (4,3)      57: (8,2)      76: (8,1,1)
    14: (4,1)    37: (12)       58: (10,1)     77: (5,4)
    15: (3,2)    38: (8,1)      59: (17)       78: (6,2,1)
    17: (7)      39: (6,2)      61: (18)       79: (22)
    19: (8)      41: (13)       62: (11,1)     82: (13,1)
    21: (4,2)    42: (4,2,1)    63: (4,2,2)    83: (23)
    22: (5,1)    43: (14)       65: (6,3)      85: (7,3)
    23: (9)      44: (5,1,1)    66: (5,2,1)    86: (14,1)
    25: (3,3)    46: (9,1)      67: (19)       87: (10,2)
    26: (6,1)    47: (15)       68: (7,1,1)    88: (5,1,1,1)

Freeman J. Dyson, A new symmetry of partitions, Journal of Combinatorial Theory 7.1 (1969): 56-61.
FindStat, St000145: The Dyson rank of a partition

Note: A-numbers of Heinz-number sequences are in parentheses below.
These partitions are counted by A064173.
The odd case is A101707 (A340604).
The even case is A101708 (A340605).
The negative version is (A340788).
A001222 counts prime factors.
A061395 selects the maximum prime index.
A072233 counts partitions by sum and length.
A168659 = partitions whose greatest part divides their length (A340609).
A168659 = partitions whose length divides their greatest part (A340610).
A200750 = partitions whose length and maximum are relatively prime.
- Rank -
A047993 counts partitions of rank 0 (A106529).
A063995/A105806 count partitions by Dyson rank.
A064174 counts partitions of nonnegative/nonpositive rank (A324562/A324521).
A101198 counts partitions of rank 1 (A325233).
A257541 gives the rank of the partition with Heinz number n.
A324520 counts partitions with rank equal to least part (A324519).
A340601 counts partitions of even rank (A340602), with strict case A117192.
A340692 counts partitions of odd rank (A340603), with strict case A117193.
Cf. A003114, A006141, A039900, A056239, A096401, A112798, A117409, A316413, A324517, A325134, A326845, A340828.

Select[Range[2,100],PrimePi[FactorInteger[#][[-1,1]]]>PrimeOmega[#]&]

For all terms A061395(a(n)) > A001222(a(n)).

A340828 Number of strict integer partitions of n whose maximum part is a multiple of their length.

Original entry on oeis.org

1, 1, 2, 1, 2, 3, 3, 2, 4, 5, 6, 6, 7, 8, 11, 10, 13, 17, 18, 21, 24, 27, 30, 35, 39, 46, 53, 61, 68, 79, 87, 97, 110, 123, 139, 157, 175, 196, 222, 247, 278, 312, 347, 385, 433, 476, 531, 586, 651, 720, 800, 883, 979, 1085, 1200, 1325, 1464, 1614, 1777

Offset: 1

Gus Wiseman, Feb 01 2021

nonn

			The a(1) = 1 through a(16) = 10 partitions (A..G = 10..16):
  1  2  3   4  5   6    7   8   9    A     B    C    D    E     F      G
        21     41  42   43  62  63   64    65   84   85   86    87     A6
                   321  61      81   82    83   A2   A3   A4    A5     C4
                                621  631   A1   642  C1   C2    C3     E2
                                     4321  632  651  643  653   E1     943
                                           641  921  652  932   654    952
                                                     931  941   942    961
                                                          8321  951    C31
                                                                C21    8431
                                                                8421   8521
                                                                54321

FindStat, St000010: The length of the partition.
FindStat, St000147: The largest part of an integer partition.
FindStat, St000784: The maximum of the length and the largest part of the integer partition.

Note: A-numbers of Heinz-number sequences are in parentheses below.
The non-strict version is A168659 (A340609/A340610).
A018818 counts partitions into divisors (A326841).
A047993 counts balanced partitions (A106529).
A064173 counts partitions of positive/negative rank (A340787/A340788).
A067538 counts partitions whose length/max divides sum (A316413/A326836).
A072233 counts partitions by sum and length, with strict case A008289.
A096401 counts strict partition with length equal to minimum.
A102627 counts strict partitions with length dividing sum.
A326842 counts partitions whose length and parts all divide sum (A326847).
A326850 counts strict partitions whose maximum part divides sum.
A326851 counts strict partitions with length and maximum dividing sum.
A340829 counts strict partitions with Heinz number divisible by sum.
A340830 counts strict partitions with all parts divisible by length.
Cf. A003114, A006141, A064174, A117409, A143773 (A316428), A200750, A326843 (A326837), A330950 (A324851).

Table[Length[Select[IntegerPartitions[n],UnsameQ@@#&&Divisible[Max@@#,Length[#]]&]],{n,30}]

A386635 Triangle read by rows where T(n,k) is the number of separable type set partitions of {1..n} into k blocks.

Original entry on oeis.org

1, 0, 1, 0, 0, 1, 0, 0, 3, 1, 0, 0, 3, 6, 1, 0, 0, 10, 25, 10, 1, 0, 0, 10, 75, 65, 15, 1, 0, 0, 35, 280, 350, 140, 21, 1, 0, 0, 35, 770, 1645, 1050, 266, 28, 1, 0, 0, 126, 2737, 7686, 6951, 2646, 462, 36, 1, 0, 0, 126, 7455, 32725, 42315, 22827, 5880, 750, 45, 1

Offset: 0

Gus Wiseman, Aug 10 2025

A set partition is of separable type iff the underlying set has a permutation whose adjacent elements always belong to different blocks. Note that this only depends on the sizes of the blocks.
A set partition is also of separable type iff its greatest block size is at most one more than the sum of all its other blocks sizes.
This is different from separable partitions (A325534) and partitions of separable type (A336106).

			Row n = 4 counts the following set partitions:
  .  .  {{1,2},{3,4}}  {{1},{2},{3,4}}  {{1},{2},{3},{4}}
        {{1,3},{2,4}}  {{1},{2,3},{4}}
        {{1,4},{2,3}}  {{1},{2,4},{3}}
                       {{1,2},{3},{4}}
                       {{1,3},{2},{4}}
                       {{1,4},{2},{3}}
Triangle begins:
    1
    0    1
    0    0    1
    0    0    3    1
    0    0    3    6    1
    0    0   10   25   10    1
    0    0   10   75   65   15    1
    0    0   35  280  350  140   21    1

Column k = 2 appears to be A128015.
For separable partitions we have A386583, sums A325534, ranks A335433.
For inseparable partitions we have A386584, sums A325535, ranks A335448.
For separable type partitions we have A386585, sums A336106, ranks A335127.
For inseparable type partitions we have A386586, sums A386638 or A025065, ranks A335126.
Row sums are A386633.
The complement is counted by A386636, row sums A386634.
A000110 counts set partitions, row sums of A048993.
A000670 counts ordered set partitions.
A003242 and A335452 count anti-runs, ranks A333489, patterns A005649.
A239455 counts Look-and-Say partitions, ranks A351294, conjugate A381432.
A335434 counts separable factorizations, inseparable A333487.
A336103 counts normal separable multisets, inseparable A336102.
A351293 counts non-Look-and-Say partitions, ranks A351295, conjugate A381433.
A386587 counts disjoint families of strict partitions of each prime exponent.
Cf. A072233, A097805, A106351, A116861, A190945, A279790, A333382, A335125, A374252, A386575, A386578.

sps[{}]:={{}};sps[set:{i_,_}]:=Join@@Function[s,Prepend[#,s]&/@sps[Complement[set,s]]]/@Cases[Subsets[set],{i,_}];
stnseps[stn_]:=Select[Permutations[Union@@stn],And@@Table[Position[stn,#[[i]]][[1,1]]!=Position[stn,#[[i+1]]][[1,1]],{i,Length[#]-1}]&];
Table[Length[Select[sps[Range[n]],Length[#]==k&&stnseps[#]!={}&]],{n,0,5},{k,0,n}]

A386636 Triangle read by rows where T(n,k) is the number of inseparable type set partitions of {1..n} into k blocks.

Original entry on oeis.org

0, 0, 0, 0, 1, 0, 0, 1, 0, 0, 0, 1, 4, 0, 0, 0, 1, 5, 0, 0, 0, 0, 1, 21, 15, 0, 0, 0, 0, 1, 28, 21, 0, 0, 0, 0, 0, 1, 92, 196, 56, 0, 0, 0, 0, 0, 1, 129, 288, 84, 0, 0, 0, 0, 0, 0, 1, 385, 1875, 1380, 210, 0, 0, 0, 0, 0, 0, 1, 561, 2860, 2145, 330, 0, 0, 0, 0, 0, 0

Offset: 0

Gus Wiseman, Aug 10 2025

A set partition is of inseparable type iff the underlying set has no permutation whose adjacent elements always belong to different blocks. Note that this only depends on the sizes of the blocks.
A set partition is also of inseparable type iff its greatest block size is at least 2 more than the sum of all its other block sizes.
This is different from inseparable partitions (A325535) and partitions of inseparable type (A386638 or A025065).

			Row n = 6 counts the following set partitions:
  .  {123456}  {1}{23456}  {1}{2}{3456}  .  .  .
               {12}{3456}  {1}{2345}{6}
               {13}{2456}  {1}{2346}{5}
               {14}{2356}  {1}{2356}{4}
               {15}{2346}  {1}{2456}{3}
               {16}{2345}  {1234}{5}{6}
               {1234}{56}  {1235}{4}{6}
               {1235}{46}  {1236}{4}{5}
               {1236}{45}  {1245}{3}{6}
               {1245}{36}  {1246}{3}{5}
               {1246}{35}  {1256}{3}{4}
               {1256}{34}  {1345}{2}{6}
               {1345}{26}  {1346}{2}{5}
               {1346}{25}  {1356}{2}{4}
               {1356}{24}  {1456}{2}{3}
               {1456}{23}
               {12345}{6}
               {12346}{5}
               {12356}{4}
               {12456}{3}
               {13456}{2}
Triangle begins:
    0
    0    0
    0    1    0
    0    1    0    0
    0    1    4    0    0
    0    1    5    0    0    0
    0    1   21   15    0    0    0
    0    1   28   21    0    0    0    0
    0    1   92  196   56    0    0    0    0
    0    1  129  288   84    0    0    0    0    0
    0    1  385 1875 1380  210    0    0    0    0    0

For separable partitions we have A386583, sums A325534, ranks A335433.
For inseparable partitions we have A386584, sums A325535, ranks A335448.
For separable type partitions we have A386585, sums A336106, ranks A335127.
For inseparable type partitions we have A386586, sums A386638 or A025065, ranks A335126.
Row sums are A386634.
The complement is counted by A386635, row sums A386633.
A000110 counts set partitions, row sums of A048993.
A000670 counts ordered set partitions.
A003242 and A335452 count anti-runs, ranks A333489, patterns A005649.
A279790 counts disjoint families on strongly normal multisets.
A335434 counts separable factorizations, inseparable A333487.
A336103 counts normal separable multisets, inseparable A336102.
A386587 counts disjoint families of strict partitions of each prime exponent.
Cf. A008284, A072233, A097805, A106351, A116861, A124762, A129506, A190945, A239455, A335125, A374252, A386575.

sps[{}]:={{}};sps[set:{i_,_}]:=Join@@Function[s,Prepend[#,s]&/@sps[Complement[set,s]]]/@Cases[Subsets[set],{i,_}];
stnseps[stn_]:=Select[Permutations[Union@@stn],And@@Table[Position[stn,#[[i]]][[1,1]]!=Position[stn,#[[i+1]]][[1,1]],{i,Length[#]-1}]&]
Table[Length[Select[sps[Range[n]],Length[#]==k&&stnseps[#]=={}&]],{n,0,5},{k,0,n}]

A340606 Numbers whose prime indices (A112798) are all divisors of the number of prime factors (A001222).

Original entry on oeis.org

1, 2, 4, 6, 8, 9, 16, 20, 24, 32, 36, 50, 54, 56, 64, 81, 84, 96, 125, 126, 128, 144, 160, 176, 189, 196, 216, 240, 256, 294, 324, 360, 384, 400, 416, 441, 486, 512, 540, 576, 600, 624, 686, 729, 810, 864, 896, 900, 936, 968, 1000, 1024, 1029, 1040, 1088, 1215

Offset: 1

Gus Wiseman, Jan 24 2021

nonn

A prime index of n is a number m such that prime(m) divides n. The multiset of prime indices of n is row n of A112798.

			The sequence of terms together with their prime indices begins:
   1: {}
   2: {1}
   4: {1,1}
   6: {1,2}
   8: {1,1,1}
   9: {2,2}
  16: {1,1,1,1}
  20: {1,1,3}
  24: {1,1,1,2}
  32: {1,1,1,1,1}
  36: {1,1,2,2}
  50: {1,3,3}
  54: {1,2,2,2}
  56: {1,1,1,4}
  64: {1,1,1,1,1,1}
  81: {2,2,2,2}
  84: {1,1,2,4}
  96: {1,1,1,1,1,2}

Note: Heinz numbers are given in parentheses below.
The reciprocal version is A143773 (A316428).
These partitions are counted by A340693.
A120383 lists numbers divisible by all of their prime indices.
A324850 lists numbers divisible by the product of their prime indices.
A003963 multiplies together the prime indices of n.
A018818 counts partitions of n into divisors of n (A326841).
A047993 counts balanced partitions (A106529).
A067538 counts partitions of n whose length divides n (A316413).
A056239 adds up the prime indices of n.
A061395 selects the maximum prime index.
A067538 counts partitions of n whose maximum divides n (A326836).
A072233 counts partitions by sum and length.
A112798 lists the prime indices of each positive integer.
A168659 = partitions whose length is divisible by their maximum (A340609).
A168659 = partitions whose maximum is divisible by their length (A340610).
A289509 lists numbers with relatively prime prime indices.
A326842 = partitions of n whose length and parts all divide n (A326847).
A326843 = partitions of n whose length and maximum both divide n (A326837).
A340852 have a factorization with factors dividing length.
Cf. A000720, A001222, A006141, A067539, A200750, A298423, A324925, A326149/A326155, A340608, A340827.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Select[Range[100],And@@IntegerQ/@(PrimeOmega[#]/primeMS[#])&]

A340830 Number of strict integer partitions of n such that every part is a multiple of the number of parts.

Original entry on oeis.org

1, 1, 1, 1, 1, 2, 1, 2, 1, 3, 1, 3, 1, 4, 1, 4, 1, 6, 1, 5, 2, 6, 1, 8, 1, 7, 4, 7, 1, 12, 1, 8, 6, 9, 1, 16, 1, 10, 9, 11, 1, 21, 1, 12, 13, 12, 1, 28, 1, 13, 17, 16, 1, 33, 1, 19, 22, 15, 1, 45, 1, 16, 28, 25, 1, 47, 1, 28, 34, 18

Offset: 1

Gus Wiseman, Feb 02 2021

nonn

			The a(n) partitions for n = 1, 6, 10, 14, 18, 20, 24, 26, 30:
  1   6     10    14     18      20     24       26      30
      4,2   6,4   8,6    10,8    12,8   16,8     18,8    22,8
            8,2   10,4   12,6    14,6   18,6     20,6    24,6
                  12,2   14,4    16,4   20,4     22,4    26,4
                         16,2    18,2   22,2     24,2    28,2
                         9,6,3          14,10    14,12   16,14
                                        12,9,3   16,10   18,12
                                        15,6,3           20,10
                                                         15,9,6
                                                         18,9,3
                                                         21,6,3
                                                         15,12,3

Note: A-numbers of Heinz-number sequences are in parentheses below.
The non-strict case is A143773 (A316428).
The case where length divides sum also is A340827.
The version for factorizations is A340851.
Factorization of this type are counted by A340853.
A018818 counts partitions into divisors (A326841).
A047993 counts balanced partitions (A106529).
A067538 counts partitions whose length/max divide sum (A316413/A326836).
A072233 counts partitions by sum and length, with strict case A008289.
A102627 counts strict partitions whose length divides sum.
A326850 counts strict partitions whose maximum part divides sum.
A326851 counts strict partitions with length and maximum dividing sum.
A340828 counts strict partitions with length divisible by maximum.
A340829 counts strict partitions with Heinz number divisible by sum.
Cf. A114638, A168659, A326641, A326843 (A326837), A326849, A326852 (A326838), A330950 (A324851), A340852.

Table[Length[Select[IntegerPartitions[n],UnsameQ@@#&&And@@IntegerQ/@(#/Length[#])&]],{n,30}]

a(n) = Sum_{d|n} A008289(n/d, d).

A340931 Heinz numbers of integer partitions of odd numbers into an odd number of parts.

Original entry on oeis.org

2, 5, 8, 11, 17, 18, 20, 23, 31, 32, 41, 42, 44, 45, 47, 50, 59, 67, 68, 72, 73, 78, 80, 83, 92, 97, 98, 99, 103, 105, 109, 110, 114, 124, 125, 127, 128, 137, 149, 153, 157, 162, 164, 167, 168, 170, 174, 176, 179, 180, 182, 188, 191, 195, 197, 200, 207, 211

Offset: 1

Gus Wiseman, Feb 05 2021

nonn

The Heinz number of an integer partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k). This is a bijective correspondence between positive integers and integer partitions.

			The sequence of terms together with the corresponding partitions begins:
      2: (1)             50: (3,3,1)        109: (29)
      5: (3)             59: (17)           110: (5,3,1)
      8: (1,1,1)         67: (19)           114: (8,2,1)
     11: (5)             68: (7,1,1)        124: (11,1,1)
     17: (7)             72: (2,2,1,1,1)    125: (3,3,3)
     18: (2,2,1)         73: (21)           127: (31)
     20: (3,1,1)         78: (6,2,1)        128: (1,1,1,1,1,1,1)
     23: (9)             80: (3,1,1,1,1)    137: (33)
     31: (11)            83: (23)           149: (35)
     32: (1,1,1,1,1)     92: (9,1,1)        153: (7,2,2)
     41: (13)            97: (25)           157: (37)
     42: (4,2,1)         98: (4,4,1)        162: (2,2,2,2,1)
     44: (5,1,1)         99: (5,2,2)        164: (13,1,1)
     45: (3,2,2)        103: (27)           167: (39)
     47: (15)           105: (4,3,2)        168: (4,2,1,1,1)

Note: A-numbers of Heinz-number sequences are in parentheses below.
These partitions are counted by A160786.
The even version is A236913 (A340784).
The case of where the prime indices are also odd is A300272.
A000009 counts partitions into odd parts (A066208).
A001222 counts prime factors.
A027193 counts odd-length partitions (A026424).
A047993 counts balanced partitions (A106529).
A056239 adds up prime indices.
A058695 counts partitions of odd numbers (A300063).
A072233 counts partitions by sum and length.
A112798 lists the prime indices of each positive integer.
Cf. A000041, A316413, A326845, A340385, A340386, A340387, A340604, A340607, A340854, A340855.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Select[Range[100],OddQ[PrimeOmega[#]]&&OddQ[Total[primeMS[#]]]&]

Intersection of A026424 and A300063.

A358824 Number of twice-partitions of n of odd length.

Original entry on oeis.org

0, 1, 2, 4, 7, 15, 32, 61, 121, 260, 498, 967, 1890, 3603, 6839, 12972, 23883, 44636, 82705, 150904, 275635, 501737, 905498, 1628293, 2922580, 5224991, 9296414, 16482995, 29125140, 51287098, 90171414, 157704275, 275419984, 479683837, 833154673, 1442550486, 2493570655

Offset: 0

Gus Wiseman, Dec 03 2022

nonn

A twice-partition of n is a sequence of integer partitions, one of each part of an integer partition of n.

			The a(1) = 1 through a(5) = 15 twice-partitions:
  (1)  (2)   (3)        (4)         (5)
       (11)  (21)       (22)        (32)
             (111)      (31)        (41)
             (1)(1)(1)  (211)       (221)
                        (1111)      (311)
                        (2)(1)(1)   (2111)
                        (11)(1)(1)  (11111)
                                    (2)(2)(1)
                                    (3)(1)(1)
                                    (11)(2)(1)
                                    (2)(11)(1)
                                    (21)(1)(1)
                                    (11)(11)(1)
                                    (111)(1)(1)
                                    (1)(1)(1)(1)(1)

Andrew Howroyd, Table of n, a(n) for n = 0..1000

The version for set partitions is A024429.
For odd lengths (instead of length) we have A358334.
The case of odd parts also is A358823.
The case of odd sums also is A358826.
The case of odd lengths also is A358834.
For multiset partitions of integer partitions: A358837, ranked by A026424.
A000009 counts partitions into odd parts.
A027193 counts partitions of odd length.
A063834 counts twice-partitions, strict A296122, row-sums of A321449.
A078408 counts odd-length partitions into odd parts.
A300301 aerated counts twice-partitions with odd sums and parts.
Cf. A000041, A001970, A072233, A270995, A271619, A279374, A279785, A306319, A336342, A356932.

twiptn[n_]:=Join@@Table[Tuples[IntegerPartitions/@ptn],{ptn,IntegerPartitions[n]}];
Table[Length[Select[twiptn[n],OddQ[Length[#]]&]],{n,0,10}]

R(u,y) = {1/prod(k=1, #u, 1 - u[k]*y*x^k + O(x*x^#u))}
seq(n) = {my(u=vector(n,k,numbpart(k))); Vec(R(u, 1) - R(u, -1), -(n+1))/2} \\ Andrew Howroyd, Dec 30 2022

G.f.: ((1/Product_{k>=1} (1-A000041(k)*x^k)) - (1/Product_{k>=1} (1+A000041(k)*x^k)))/2. - Andrew Howroyd, Dec 30 2022

Terms a(26) and beyond from Andrew Howroyd, Dec 30 2022

A367582 Triangle read by rows where T(n,k) is the number of integer partitions of n whose multiset multiplicity kernel (in which each multiplicity becomes the least element of that multiplicity), sums to k.

Original entry on oeis.org

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

Offset: 0

Gus Wiseman, Nov 28 2023

We define the multiset multiplicity kernel MMK(m) of a multiset m by the following property, holding for all distinct multiplicities k >= 1. If S is the set of elements of multiplicity k in m, then min(S) has multiplicity |S| in MMK(m). For example, MMK({1,1,2,2,3,4,5}) = {1,1,3,3,3}, and MMK({1,2,3,4,5,5,5,5}) = {1,1,1,1,5}. As an operation on multisets, MMK is represented by A367579, and as an operation on their Heinz numbers, it is represented by A367580.

			Triangle begins:
  1
  0  1
  0  1  1
  0  1  1  1
  0  1  2  1  1
  0  1  1  2  2  1
  0  1  3  3  2  1  1
  0  1  1  4  3  3  2  1
  0  1  3  5  4  4  3  1  1
  0  1  2  6  4  8  3  3  2  1
  0  1  3  7  9  6  7  4  3  1  1
  0  1  1  8  7 11  9  9  4  3  2  1
  0  1  5 10 11 13 10 11  6  5  3  1  1
  0  1  1 10 11 17 14 18 10  9  4  3  2  1
  0  1  3 12 17 19 18 22 14 12  8  4  3  1  1
  0  1  3 12 15 27 19 31 19 19 10  9  5  3  2  1
  0  1  4 15 23 27 31 33 24 26 18 12  8  4  3  1  1
  0  1  1 14 20 35 33 48 32 37 25 20 11 10  4  3  2  1
Row n = 7 counts the following partitions:
  (1111111)  (61)  (421)     (52)     (4111)  (511)  (7)
                   (2221)    (331)    (322)   (43)
                   (22111)   (31111)  (3211)
                   (211111)

Column k = 2 is A000005(n) - 1 = A032741(n).
Row sums are A000041.
The case of constant partitions is A051731, row sums A000005.
The corresponding rank statistic is A367581, row sums of A367579.
A072233 counts partitions by number of parts.
A091602 counts partitions by greatest multiplicity, least A243978.
A116608 counts partitions by number of distinct parts.
A116861 counts partitions by sum of distinct parts.
Cf. A000837, A056239, A066328, A071625, A072774, A082090, A367580.

mmk[q_]:=With[{mts=Length/@Split[q]}, Sort[Table[Min@@Select[q, Count[q,#]==i&], {i,mts}]]];
Table[Length[Select[IntegerPartitions[n], Total[mmk[#]]==k&]], {n,0,10}, {k,0,n}]

A386581 Number of normal multisets of size n with no permutation having all distinct run lengths.

Original entry on oeis.org

0, 0, 1, 1, 5, 11, 20, 51, 108, 229, 448, 953, 1940, 3951, 7986, 15972

Offset: 0

Gus Wiseman, Aug 12 2025

A multiset is normal iff it covers an initial interval of positive integers.

			The normal multiset m = {1,1,1,2,2,2} has permutation (1,2,2,2,1,1) with run lengths (1,3,2), so m is not counted under a(6).
The a(1) = 0 through a(6) = 20 multisets:
  .  (12)  (123)  (1122)  (11123)  (111123)
                  (1123)  (11223)  (111234)
                  (1223)  (11233)  (112233)
                  (1233)  (11234)  (112234)
                  (1234)  (12223)  (112334)
                          (12233)  (112344)
                          (12234)  (112345)
                          (12333)  (122223)
                          (12334)  (122234)
                          (12344)  (122334)
                          (12345)  (122344)
                                   (122345)
                                   (123333)
                                   (123334)
                                   (123344)
                                   (123345)
                                   (123444)
                                   (123445)
                                   (123455)
                                   (123456)

The complement for partitions appears to be A239455, ranks A351294 or A381432.
For integer partitions we appear to have A351293, ranks A351295 or A381433.
For weakly decreasing multiplicities we appear to have A383710, ranks A382912.
The complement is counted by A386580, see A383708.
A032020 counts normal multisets with distinct multiplicities.
A048767 is the Look-and-Say transform, fixed points A048768 (counted by A217605).
A098859 counts partitions with distinct multiplicities, compositions A242882.
Cf. A000009, A025065, A047966, A072233, A116540, A130091, A320347, A326083, A382771, A382913, A383706.

allnorm[n_]:=If[n<=0,{{}},Function[s,Array[Count[s,y_/;y<=#]+1&,n]]/@Subsets[Range[n-1]+1]];
nodrm[y_]:=Select[Permutations[y],UnsameQ@@Length/@Split[#]&];
Table[Length[Select[allnorm[n],nodrm[#]=={}&]],{n,0,7}]

cp's OEIS Frontend

A340787 Heinz numbers of integer partitions of positive rank.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

A340828 Number of strict integer partitions of n whose maximum part is a multiple of their length.

Views

Author

Keywords

Examples

Links

Crossrefs

Programs

Mathematica

A386635 Triangle read by rows where T(n,k) is the number of separable type set partitions of {1..n} into k blocks.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A386636 Triangle read by rows where T(n,k) is the number of inseparable type set partitions of {1..n} into k blocks.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A340606 Numbers whose prime indices (A112798) are all divisors of the number of prime factors (A001222).

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A340830 Number of strict integer partitions of n such that every part is a multiple of the number of parts.

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

Formula

A340931 Heinz numbers of integer partitions of odd numbers into an odd number of parts.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula

A358824 Number of twice-partitions of n of odd length.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

Formula

Extensions