A038041 -id:A038041 - cp's OEIS frontend

A326533 MM-numbers of multiset partitions where each part has a different length.

1, 2, 3, 5, 6, 7, 10, 11, 13, 14, 17, 19, 21, 22, 23, 26, 29, 31, 34, 35, 37, 38, 39, 41, 42, 43, 46, 47, 53, 57, 58, 59, 61, 62, 65, 67, 69, 70, 71, 73, 74, 77, 78, 79, 82, 83, 86, 87, 89, 94, 95, 97, 101, 103, 106, 107, 109, 111, 113, 114, 115, 118, 119, 122

Offset: 1

Gus Wiseman, Jul 12 2019

nonn

These are numbers where each prime index has a different Omega (number of prime factors counted with multiplicity). 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 multiset multisystem with MM-number n is obtained by taking the multiset of prime indices of each prime index of n. For example, the prime indices of 78 are {1,2,6}, so the multiset multisystem with MM-number 78 is {{},{1},{1,2}}.

			The sequence of multiset partitions where each part has a different average preceded by their MM-numbers begins:
   1: {}
   2: {{}}
   3: {{1}}
   5: {{2}}
   6: {{},{1}}
   7: {{1,1}}
  10: {{},{2}}
  11: {{3}}
  13: {{1,2}}
  14: {{},{1,1}}
  17: {{4}}
  19: {{1,1,1}}
  21: {{1},{1,1}}
  22: {{},{3}}
  23: {{2,2}}
  26: {{},{1,2}}
  29: {{1,3}}
  31: {{5}}
  34: {{},{4}}
  35: {{2},{1,1}}

Gus Wiseman, Sequences counting and ranking multiset partitions whose part lengths, sums, or averages are constant or strict.

A subsequence of A005117.

Cf. A007837, A038041, A112798, A302242, A320324, A326026, A326514, A326517, A326534, A326535, A326536, A326537.

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

A336132 Number of ways to split a strict integer partition of n into contiguous subsequences all having different sums.

Original entry on oeis.org

1, 1, 1, 3, 3, 5, 8, 11, 14, 21, 30, 37, 51, 66, 86, 120, 146, 186, 243, 303, 378, 495, 601, 752, 927, 1150, 1395, 1741, 2114, 2571, 3134, 3788, 4541, 5527, 6583, 7917, 9511, 11319, 13448, 16040, 18996, 22455, 26589, 31317, 36844, 43518, 50917, 59655, 69933

Offset: 0

Gus Wiseman, Jul 11 2020

nonn

			The a(1) = 1 through a(7) = 14 splits:
  (1)  (2)  (3)      (4)      (5)      (6)          (7)
            (2,1)    (3,1)    (3,2)    (4,2)        (4,3)
            (2),(1)  (3),(1)  (4,1)    (5,1)        (5,2)
                              (3),(2)  (3,2,1)      (6,1)
                              (4),(1)  (4),(2)      (4,2,1)
                                       (5),(1)      (4),(3)
                                       (3,2),(1)    (5),(2)
                                       (3),(2),(1)  (6),(1)
                                                    (4),(2,1)
                                                    (4,2),(1)
                                                    (4),(2),(1)

Gus Wiseman, Sequences counting and ranking multiset partitions whose part lengths, sums, or averages are constant or strict.

The version with equal instead of different sums is A318683.
Starting with a composition gives A336127.
Starting with a strict composition gives A336128.
Starting with a partition gives A336131.
Partitions of partitions are A001970.
Partitions of compositions are A075900.
Compositions of compositions are A133494.
Compositions of partitions are A323583.
Cf. A006951, A063834, A279786, A305551, A316245, A317715, A323433, A336130, A336134, A336135.

splits[dom_]:=Append[Join@@Table[Prepend[#,Take[dom,i]]&/@splits[Drop[dom,i]],{i,Length[dom]-1}],{dom}];
Table[Sum[Length[Select[splits[ctn],UnsameQ@@Total/@#&]],{ctn,Select[IntegerPartitions[n],UnsameQ@@#&]}],{n,0,30}]

A306019 Number of non-isomorphic set-systems of weight n in which all parts have the same size.

Original entry on oeis.org

1, 1, 2, 2, 4, 2, 10, 2, 17, 14, 33, 2, 167, 2, 186, 491, 785, 2, 5839, 2, 11123, 53454, 15229, 2, 1102924, 53537, 193382, 16334183, 12411062, 2, 382413555, 2, 993814248, 9763321547, 53394774, 1778595972, 402119882757, 2, 1111261718, 9674133468473, 16955983996383

Offset: 0

Gus Wiseman, Jun 17 2018

nonn

A set-system of weight n is a finite set of finite nonempty sets whose sizes sum to n.

			Non-isomorphic representatives of the a(6) = 10 set-systems:
{{1,2,3,4,5,6}}
{{1,2,3},{4,5,6}}
{{1,2,5},{3,4,5}}
{{1,3,4},{2,3,4}}
{{1,2},{1,3},{2,3}}
{{1,2},{3,4},{5,6}}
{{1,2},{3,5},{4,5}}
{{1,3},{2,4},{3,4}}
{{1,4},{2,4},{3,4}}
{{1},{2},{3},{4},{5},{6}}

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

Cf. A000005, A001315, A007716, A038041, A049311, A283877, A298422, A306017, A306018, A306020, A306021.

\\ See A331508 for T(n,k).
a(n) = {if(n==0, 1, sumdiv(n, d, if(d==1 || d==n, 1, T(n/d, d))))} \\ Andrew Howroyd, Jan 16 2024

a(p) = 2 for prime p. - Andrew Howroyd, Aug 29 2019

a(n) = Sum_{d|n} A331508(n/d, d) for n > 0. - Andrew Howroyd, Jan 16 2024

Terms a(12) and beyond from Andrew Howroyd, Sep 01 2019

A323295 Number of ways to fill a matrix with the first n positive integers.

Original entry on oeis.org

1, 1, 4, 12, 72, 240, 2880, 10080, 161280, 1088640, 14515200, 79833600, 2874009600, 12454041600, 348713164800, 5230697472000, 104613949440000, 711374856192000, 38414242234368000, 243290200817664000, 14597412049059840000, 204363768686837760000

Offset: 0

Gus Wiseman, Jan 12 2019

nonn

			The a(4) = 72 matrices consist of:
  24 row/column permutations of [1 2 3 4]
+
  4 row/column permutations of [1 2]
                               [3 4]
+
  4 row/column permutations of [1 2]
                               [4 3]
+
  4 row/column permutations of [1 3]
                               [2 4]
+
  4 row/column permutations of [1 3]
                               [4 2]
+
  4 row/column permutations of [1 4]
                               [2 3]
+
  4 row/column permutations of [1 4]
                               [3 2]
+
  24 row/column permutations of [1]
                                [2]
                                [3]
                                [4]

Cf. A000005, A000142, A038041, A053529, A057625, A061095, A120733, A121860.

Cf. A323300, A323301, A323307, A323351.

Join[{1}, Table[DivisorSigma[0, n]*n!, {n, 30}]]

a(n) = if (n==0, 1, numdiv(n)*n!); \\ Michel Marcus, Jan 15 2019

a(n) = A000005(n) * n! for n > 0, a(0) = 1.

E.g.f.: 1 + Sum_{k>=1} x^k/(1 - x^k). - Ilya Gutkovskiy, Sep 13 2019

A326537 MM-numbers of multiset partitions where each part has a different average.

Original entry on oeis.org

1, 2, 3, 5, 6, 7, 10, 11, 13, 14, 15, 17, 19, 22, 23, 26, 29, 30, 31, 33, 34, 35, 37, 38, 39, 41, 43, 46, 47, 51, 53, 55, 58, 59, 61, 62, 65, 66, 67, 69, 70, 71, 73, 74, 77, 78, 79, 82, 83, 85, 86, 87, 89, 91, 93, 94, 95, 97, 101, 102, 103, 106, 107, 109, 110

Offset: 1

Gus Wiseman, Jul 12 2019

nonn

These are numbers where each prime index has a different average of prime indices. 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 multiset multisystem with MM-number n is obtained by taking the multiset of prime indices of each prime index of n. For example, the prime indices of 78 are {1,2,6}, so the multiset multisystem with MM-number 78 is {{},{1},{1,2}}.

			The sequence of multiset partitions where each part has a different average, preceded by their MM-numbers, begins:
   1: {}
   2: {{}}
   3: {{1}}
   5: {{2}}
   6: {{},{1}}
   7: {{1,1}}
  10: {{},{2}}
  11: {{3}}
  13: {{1,2}}
  14: {{},{1,1}}
  15: {{1},{2}}
  17: {{4}}
  19: {{1,1,1}}
  22: {{},{3}}
  23: {{2,2}}
  26: {{},{1,2}}
  29: {{1,3}}
  30: {{},{1},{2}}
  31: {{5}}
  33: {{1},{3}}

Gus Wiseman, Sequences counting and ranking multiset partitions whose part lengths, sums, or averages are constant or strict.

Cf. A038041, A051293, A112798, A302242, A320324, A326513, A326516, A326521, A326533, A326534, A326535, A326536.

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

A336131 Number of ways to split an integer partition of n into contiguous subsequences all having different sums.

Original entry on oeis.org

1, 1, 2, 6, 9, 20, 44, 74, 123, 231, 441, 681, 1188, 1889, 3110, 5448, 8310, 13046

Offset: 0

Gus Wiseman, Jul 11 2020

			The a(1) = 1 through a(4) = 9 splits:
  (1)  (2)    (3)        (4)
       (1,1)  (2,1)      (2,2)
              (1,1,1)    (3,1)
              (2),(1)    (2,1,1)
              (1),(1,1)  (3),(1)
              (1,1),(1)  (1,1,1,1)
                         (2,1),(1)
                         (1),(1,1,1)
                         (1,1,1),(1)

Gus Wiseman, Sequences counting and ranking multiset partitions whose part lengths, sums, or averages are constant or strict.

The version with equal instead of different sums is A317715.
Starting with a composition gives A336127.
Starting with a strict composition gives A336128.
Starting with a strict partition gives A336132.
Partitions of partitions are A001970.
Partitions of compositions are A075900.
Compositions of compositions are A133494.
Compositions of partitions are A323583.
Cf. A006951, A063834, A279786, A305551, A316245, A323433, A336130, A336134, A336135.

splits[dom_]:=Append[Join@@Table[Prepend[#,Take[dom,i]]&/@splits[Drop[dom,i]],{i,Length[dom]-1}],{dom}];
Table[Sum[Length[Select[splits[ctn],UnsameQ@@Total/@#&]],{ctn,IntegerPartitions[n]}],{n,0,10}]

A306018 Number of non-isomorphic set multipartitions of weight n in which all parts have the same size.

Original entry on oeis.org

1, 1, 3, 4, 9, 8, 24, 16, 51, 47, 115, 57, 420, 102, 830, 879, 2962, 298, 15527, 491, 41275, 80481, 133292, 1256, 2038182, 58671, 2386862, 24061887, 23570088, 4566, 600731285, 6843, 1303320380, 14138926716, 1182784693, 1820343112, 542834549721, 21638, 31525806080

Offset: 0

Gus Wiseman, Jun 17 2018

nonn

A set multipartition of weight n is a finite multiset of finite nonempty sets whose cardinalities sum to n.

Number of distinct binary matrices with all row sums equal and total sum n, up to row and column permutations. - Andrew Howroyd, Sep 05 2018

			Non-isomorphic representatives of the a(6) = 24 set multipartitions in which all parts have the same size:
{{1,2,3,4,5,6}}
{{1,2,3},{1,2,3}}
{{1,2,3},{4,5,6}}
{{1,2,5},{3,4,5}}
{{1,3,4},{2,3,4}}
{{1,2},{1,2},{1,2}}
{{1,2},{1,3},{2,3}}
{{1,2},{3,4},{3,4}}
{{1,2},{3,4},{5,6}}
{{1,2},{3,5},{4,5}}
{{1,3},{2,3},{2,3}}
{{1,3},{2,4},{3,4}}
{{1,4},{2,4},{3,4}}
{{1},{1},{1},{1},{1},{1}}
{{1},{1},{1},{2},{2},{2}}
{{1},{1},{2},{2},{2},{2}}
{{1},{1},{2},{2},{3},{3}}
{{1},{2},{2},{2},{2},{2}}
{{1},{2},{2},{3},{3},{3}}
{{1},{2},{3},{3},{3},{3}}
{{1},{2},{3},{3},{4},{4}}
{{1},{2},{3},{4},{4},{4}}
{{1},{2},{3},{4},{5},{5}}
{{1},{2},{3},{4},{5},{6}}

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

Cf. A000005, A000041, A001315, A007716, A038041, A049311, A283877, A298422, A304942, A306017, A306019, A306020, A306021, A331461.

\\ See A304942 for Blocks
a(n)={sumdiv(n, d, Blocks(n/d, n, d))} \\ Andrew Howroyd, Sep 05 2018

a(p) = A000041(p) + 1 for prime p. - Andrew Howroyd, Sep 06 2018

a(n) = Sum_{d|n} A331461(n/d, d). - Andrew Howroyd, Feb 09 2020

Terms a(11) and beyond from Andrew Howroyd, Sep 05 2018

A306020 a(n) is the number of set-systems using nonempty subsets of {1,...,n} in which all sets have the same size.

Original entry on oeis.org

1, 2, 5, 16, 95, 2110, 1114237, 68723671292, 1180735735906024030715, 170141183460507917357914971986913657850, 7237005577335553223087828975127304179197147198604070555943173844710572689401

Offset: 0

Gus Wiseman, Jun 17 2018

nonn

A058673(n) <= a(n). - Lorenzo Sauras Altuzarra, Aug 10 2023

			a(3) = 16 set-systems in which all sets have the same size:
  {}
  {{1}}
  {{2}}
  {{3}}
  {{1,2}}
  {{1,3}}
  {{2,3}}
  {{1,2,3}}
  {{1},{2}}
  {{1},{3}}
  {{2},{3}}
  {{1,2},{1,3}}
  {{1,2},{2,3}}
  {{1,3},{2,3}}
  {{1},{2},{3}}
  {{1,2},{1,3},{2,3}}

Index entries for sequences related to matroids

Cf. A000005, A001315, A007716, A038041, A049311, A058673 (labeled matroids), A283877, A298422, A306017, A306018, A306019, A306021.

Row sums of A059328.

a := n -> 1-n+add(2^binomial(n, d), d = 1 .. n):
seq(a(n), n = 0 .. 10); # Lorenzo Sauras Altuzarra, Aug 11 2023

Table[1+Sum[2^Binomial[n,d]-1,{d,n}],{n,10}]

a(n) = 1 - n + sum(d = 1, n, 2^binomial(n, d)); \\ Michel Marcus, Aug 10 2023

a(n) = 1 - n + Sum_{d = 1..n} 2^binomial(n, d).

A326520 Number of normal multiset partitions of weight n where every part has the same average.

Original entry on oeis.org

1, 1, 3, 7, 17, 35, 103, 197

Offset: 0

Gus Wiseman, Jul 12 2019

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

			The a(0) = 1 through a(4) = 17 normal multiset partitions where every part has the same average:
  {}  {{1}}  {{1,1}}    {{1,1,1}}      {{1,1,1,1}}
             {{1,2}}    {{1,1,2}}      {{1,1,1,2}}
             {{1},{1}}  {{1,2,2}}      {{1,1,2,2}}
                        {{1,2,3}}      {{1,1,2,3}}
                        {{1},{1,1}}    {{1,2,2,2}}
                        {{2},{1,3}}    {{1,2,2,3}}
                        {{1},{1},{1}}  {{1,2,3,3}}
                                       {{1,2,3,4}}
                                       {{1},{1,1,1}}
                                       {{1,1},{1,1}}
                                       {{1,2},{1,2}}
                                       {{1,3},{2,2}}
                                       {{1,4},{2,3}}
                                       {{2},{1,2,3}}
                                       {{1},{1},{1,1}}
                                       {{2},{2},{1,3}}
                                       {{1},{1},{1},{1}}

Gus Wiseman, Sequences counting and ranking multiset partitions whose part lengths, sums, or averages are constant or strict.

Cf. A038041, A051293, A255906, A317583, A326512, A326515, A326517, A326518, A326519, A326521, A326536.

sps[{}]:={{}};sps[set:{i_,_}]:=Join@@Function[s,Prepend[#,s]&/@sps[Complement[set,s]]]/@Cases[Subsets[set],{i,_}];
mps[set_]:=Union[Sort[Sort/@(#/.x_Integer:>set[[x]])]&/@sps[Range[Length[set]]]];
allnorm[n_]:=If[n<=0,{{}},Function[s,Array[Count[s,y_/;y<=#]+1&,n]]/@Subsets[Range[n-1]+1]];
Table[Length[Select[Join@@mps/@allnorm[n],SameQ@@Mean/@#&]],{n,0,5}]

A326521 Number of normal multiset partitions of weight n where each part has a different average.

Original entry on oeis.org

1, 1, 3, 11, 49, 251, 1418, 8904

Offset: 0

Gus Wiseman, Jul 12 2019

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

			The a(0) = 1 through a(3) = 11 normal multiset partitions where each part has a different average:
  {}  {{1}}  {{1,1}}    {{1,1,1}}
             {{1,2}}    {{1,1,2}}
             {{1},{2}}  {{1,2,2}}
                        {{1,2,3}}
                        {{1},{1,2}}
                        {{1},{2,2}}
                        {{1},{2,3}}
                        {{2},{1,1}}
                        {{2},{1,2}}
                        {{3},{1,2}}
                        {{1},{2},{3}}

Gus Wiseman, Sequences counting and ranking multiset partitions whose part lengths, sums, or averages are constant or strict.

Cf. A051293, A255906, A317583, A326513, A326516, A326517, A326518, A326519, A326520, A326537.

sps[{}]:={{}};sps[set:{i_,_}]:=Join@@Function[s,Prepend[#,s]&/@sps[Complement[set,s]]]/@Cases[Subsets[set],{i,_}];
mps[set_]:=Union[Sort[Sort/@(#/.x_Integer:>set[[x]])]&/@sps[Range[Length[set]]]];
allnorm[n_]:=If[n<=0,{{}},Function[s,Array[Count[s,y_/;y<=#]+1&,n]]/@Subsets[Range[n-1]+1]];
Table[Length[Select[Join@@mps/@allnorm[n],UnsameQ@@Mean/@#&]],{n,0,5}]

cp's OEIS Frontend

A326533 MM-numbers of multiset partitions where each part has a different length.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A336132 Number of ways to split a strict integer partition of n into contiguous subsequences all having different sums.

Views

Author

Keywords

Examples

Links

Crossrefs

Programs

Mathematica

A306019 Number of non-isomorphic set-systems of weight n in which all parts have the same size.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

PARI

Formula

Extensions

A323295 Number of ways to fill a matrix with the first n positive integers.

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

PARI

Formula

A326537 MM-numbers of multiset partitions where each part has a different average.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A336131 Number of ways to split an integer partition of n into contiguous subsequences all having different sums.

Views

Author

Keywords

Examples

Links

Crossrefs

Programs

Mathematica

A306018 Number of non-isomorphic set multipartitions of weight n in which all parts have the same size.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

PARI

Formula

Extensions

A306020 a(n) is the number of set-systems using nonempty subsets of {1,...,n} in which all sets have the same size.

Views

Author

Keywords

Comments

Examples

Links