A116539 -id:A116539 - cp's OEIS frontend

A382430 Number of non-isomorphic finite multisets of size n that cannot be partitioned into sets with distinct sums.

0, 0, 1, 1, 2, 3, 5, 6, 9, 12, 17, 22, 32

Offset: 0

Gus Wiseman, Apr 01 2025

We call a multiset non-isomorphic iff it covers an initial interval of positive integers with weakly decreasing multiplicities. The size of a multiset is the number of elements, counting multiplicity.

			The a(2) = 1 through a(7) = 6 multisets:
  {1,1}  {1,1,1}  {1,1,1,1}  {1,1,1,1,1}  {1,1,1,1,1,1}  {1,1,1,1,1,1,1}
                  {1,1,1,2}  {1,1,1,1,2}  {1,1,1,1,1,2}  {1,1,1,1,1,1,2}
                             {1,1,1,2,2}  {1,1,1,1,2,2}  {1,1,1,1,1,2,2}
                                          {1,1,1,1,2,3}  {1,1,1,1,1,2,3}
                                          {1,1,1,2,2,2}  {1,1,1,1,2,2,2}
                                                         {1,1,1,1,2,2,3}

Twice-partitions of this type are counted by A279785, strict A358914.
The strict version is A292444.
Factorizations of this type are counted by A381633, strict A050326.
Normal multiset partitions of this type are counted by A381718, strict A116539.
For integer partitions we have A381990, ranks A381806, complement A381992, ranks A382075.
The strict version for integer partitions is A382078, ranks A293243, complement A382077, ranks A382200.
The normal version is A382202, complement A382216, strict A292432, complement A382214.
The complement is counted by A382523, strict A381996.

strnorm[n_]:=Flatten[MapIndexed[Table[#2,{#1}]&,#]]&/@IntegerPartitions[n];
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]]]];
Table[Length[Select[strnorm[n],Select[mps[#],UnsameQ@@Total/@#&&And@@UnsameQ@@@#&]=={}&]],{n,0,5}]

A318371 Number of non-isomorphic strict set multipartitions (sets of sets) of a multiset whose multiplicities are the prime indices of n.

Original entry on oeis.org

1, 1, 0, 2, 0, 1, 0, 3, 1, 0, 0, 3, 0, 0, 0, 5, 0, 4, 0, 1, 0, 0, 0, 6, 0, 0, 4, 0, 0, 2

Offset: 1

Gus Wiseman, Aug 24 2018

			Non-isomorphic representatives of the a(24) = 6 strict set multipartitions of {1,1,2,3,4}:
  {{1},{1,2,3,4}}
  {{1,2},{1,3,4}}
  {{1},{2},{1,3,4}}
  {{1},{1,2},{3,4}}
  {{2},{1,3},{1,4}}
  {{1},{2},{3},{1,4}}

Cf. A007716, A045778, A049311, A050326, A116539, A116540, A283877, A292432 A292444.

Cf. A318283, A318285, A318287, A318360, A318361, A318362, A318369, A318370.

a(n) = A318370(A181821(n)).

A331638 Number of binary matrices with nonzero rows, a total of n ones and each column with the same number of ones and columns in nonincreasing lexicographic order.

Original entry on oeis.org

1, 3, 5, 16, 17, 140, 65, 1395, 2969, 22176, 1025, 1050766, 4097, 13010328, 128268897, 637598438, 65537, 64864962683, 262145, 1676258452736, 28683380484257, 24908619669860, 4194305, 30567710172480050, 8756434134071649, 62128557507554504, 21271147396968151093

Offset: 1

Andrew Howroyd, Jan 23 2020

nonn

The condition that the columns be in nonincreasing order is equivalent to considering nonequivalent matrices up to permutation of columns.
From Gus Wiseman, Apr 03 2025: (Start)
Also the number of multiset partitions such that (1) the blocks together cover an initial interval of positive integers, (2) the blocks are sets of a common size, and (3) the block-sizes sum to n. For example, the a(1) = 1 through a(4) = 16 multiset partitions are:
  {{1}}  {{1,2}}    {{1,2,3}}      {{1,2,3,4}}
         {{1},{1}}  {{1},{1},{1}}  {{1,2},{1,2}}
         {{1},{2}}  {{1},{1},{2}}  {{1,2},{1,3}}
                    {{1},{2},{2}}  {{1,2},{2,3}}
                    {{1},{2},{3}}  {{1,2},{3,4}}
                                   {{1,3},{2,3}}
                                   {{1,3},{2,4}}
                                   {{1,4},{2,3}}
                                   {{1},{1},{1},{1}}
                                   {{1},{1},{1},{2}}
                                   {{1},{1},{2},{2}}
                                   {{1},{1},{2},{3}}
                                   {{1},{2},{2},{2}}
                                   {{1},{2},{2},{3}}
                                   {{1},{2},{3},{3}}
                                   {{1},{2},{3},{4}}
(End)

Andrew Howroyd, Table of n, a(n) for n = 1..200

Cf. A330942, A331639.
For constant instead of strict blocks we have A034729.
Without equal sizes we have A116540 (normal set multipartitions).
Without strict blocks we have A317583.
For distinct instead of equal sizes we have A382428, non-strict blocks A326517.
For equal sums instead of sizes we have A382429, non-strict blocks A326518.
Normal multiset partitions: A255903, A255906, A317532, A382203, A382204, A382216.
Cf. A000110, A000670, A007716, A034691, A035310, A050320, A050326, A116539, A306319, A381718.

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

a(p) = 2^(p-1) + 1 for prime p.

A382458 Number of normal multisets of size n that can be partitioned into a set of sets in exactly one way.

Original entry on oeis.org

1, 1, 0, 2, 1, 3, 0, 7, 3, 11, 18, 9

Offset: 0

Gus Wiseman, Mar 30 2025

We call a multiset or multiset partition normal iff it covers an initial interval of positive integers. The size of a multiset is the number of elements, counting multiplicity.

			The normal multiset {1,2,2,2,2,3,3,4} has three multiset partitions into a set of sets:
  {{2},{1,2},{2,3},{2,3,4}}
  {{2},{2,3},{2,4},{1,2,3}}
  {{2},{3},{1,2},{2,3},{2,4}}
so is not counted under a(8).
The a(1) = 1 through a(7) = 7 normal multisets:
  {1}  .  {1,1,2}  {1,1,2,2}  {1,1,1,2,3}  .  {1,1,1,1,2,3,4}
          {1,2,2}             {1,2,2,2,3}     {1,1,1,2,2,2,3}
                              {1,2,3,3,3}     {1,1,1,2,3,3,3}
                                              {1,2,2,2,2,3,4}
                                              {1,2,2,2,3,3,3}
                                              {1,2,3,3,3,3,4}
                                              {1,2,3,4,4,4,4}

For constant instead of strict blocks we have A000045.
Factorizations of this type are counted by A050326, with distinct sums A381633.
For the strong case see A292444, A382430, complement A381996, A382523.
MM-numbers of sets of sets are A302494, see A302478, A382201.
Twice-partitions into distinct sets are counted by A358914, with distinct sums A279785.
For integer partitions we have A382079 (A293511), with distinct sums A382460, (A381870).
With distinct sums we have A382459.
Set multipartitions: A050320, A089259, A116540, A270995, A296119, A318360.
Normal multiset partitions: A034691, A035310, A116539, A255906, A381718.
Set systems: A050342, A296120, A318361.
Partitions: A382077 (A382200), A381992 (A382075), A382078 (A293243), A381990 (A381806).
Cf. A000110, A000670, A007716, A255903, A275780, A292432, A317532, A326519, A382428.

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

A382459 Number of normal multisets of size n that can be partitioned into a set of sets with distinct sums in exactly one way.

Original entry on oeis.org

1, 1, 0, 2, 1, 3, 2, 7, 4, 10, 19

Offset: 0

Gus Wiseman, Apr 01 2025

We call a multiset or multiset partition normal iff it covers an initial interval of positive integers. The size of a multiset is the number of elements, counting multiplicity.

			The normal multiset {1,2,2,2,2,3,3,4} has only one multiset partition into a set of sets with distinct sums: {{2},{1,2},{2,3},{2,3,4}}, so is counted under a(8).
The a(1) = 1 through a(7) = 7 multisets:
  {1}  .  {112}  {1122}  {11123}  {111233}  {1111234}
          {122}          {12223}  {122233}  {1112223}
                         {12333}            {1112333}
                                            {1222234}
                                            {1222333}
                                            {1233334}
                                            {1234444}

Twice-partitions of this type are counted by A279785, A270995, A358914.
Factorizations of this type are counted by A381633, A050320, A050326.
Normal multiset partitions of this type are A381718, A116540, A116539.
Multiset partitions of this type are ranked by A382201, A302478, A302494.
For at least one choice: A382216 (strict A382214), complement A382202 (strict A292432).
For the strong case see: A382430 (strict A292444), complement A382523 (strict A381996).
Without distinct sums we have A382458.
For integer partitions we have A382460, ranks A381870, strict A382079, ranks A293511.
Set multipartitions: A089259, A296119, A318360.
Normal multiset partitions: A034691, A035310, A255906.
Set systems: A050342, A296120, A318361.
Partitions: A382077 (A382200), A381992 (A382075), A382078 (A293243), A381990 (A381806).
Cf. A000110, A000670, A007716, A255903, A275780, A317532, A321469, A326519, A381078, A381441, A382428.

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

A382523 Number of non-isomorphic finite multisets of size n that can be partitioned into sets with distinct sums.

Original entry on oeis.org

1, 1, 2, 3, 4, 6, 9, 13, 18, 25, 34, 45

Offset: 0

Gus Wiseman, Apr 01 2025

First differs from A381996 at a(12) = 45, A381996(12) = 47.

We call a multiset non-isomorphic iff it covers an initial interval of positive integers with weakly decreasing multiplicities. The size of a multiset is the number of elements, counting multiplicity.

			First differs from A381996 in not counting the following under a(12):
  {1,1,1,1,1,1,2,2,3,3,4,5}
  {1,1,1,1,2,2,2,2,3,3,3,3}
The a(1) = 1 through a(6) = 6 multisets:
  {1}  {1,2}  {1,1,2}  {1,1,2,2}  {1,1,1,2,3}  {1,1,1,2,2,3}
              {1,2,3}  {1,1,2,3}  {1,1,2,2,3}  {1,1,1,2,3,4}
                       {1,2,3,4}  {1,1,2,3,4}  {1,1,2,2,3,3}
                                  {1,2,3,4,5}  {1,1,2,2,3,4}
                                               {1,1,2,3,4,5}
                                               {1,2,3,4,5,6}

Twice-partitions of this type are counted by A279785, strict A358914.
Factorizations of this type are counted by A381633, strict A050326.
Normal multiset partitions of this type are counted by A381718, strict A116539.
For integer partitions we have A381992, ranks A382075, complement A381990, ranks A381806.
The strict version is A381996.
The strict version for integer partitions is A382077, ranks A382200, complement A382078, ranks A293243.
The labeled version is A382216, complement A382202, strict A382214, complement A292432.
The complement is counted by A382430, strict A292444.

strnorm[n_]:=Flatten[MapIndexed[Table[#2,{#1}]&,#]]&/@IntegerPartitions[n];
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]]]];
Table[Length[Select[strnorm[n],Select[mps[#],UnsameQ@@Total/@#&&And@@UnsameQ@@@#&]!={}&]],{n,0,5}]

A103775 Number of ways to write n! as product of distinct squarefree numbers.

Original entry on oeis.org

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

Offset: 1

Reinhard Zumkeller, Feb 15 2005

nonn

From Gus Wiseman, Aug 23 2020: (Start)
Also the number of set-systems (sets of sets) whose multiset union is the multiset of prime factors of n!. For example, the a(1) = 1 through a(7) = 3 set-systems (empty columns indicated by dots) are:
  0  {1}  {1,2}    .  {1},{1,2},{1,3}  .  {1},{1,2},{1,3},{1,2,4}
          {1},{2}                         {1},{1,2},{1,4},{1,2,3}
                                          {1},{2},{1,2},{1,3},{1,4}
(End)

			n=7, 7! = 1*2*3*4*5*6*7 = 5040 = 2*2*2*2*3*3*5*7: a(7) = #{2*3*6*10*14, 2*6*10*42, 2*6*14*30} = 3.

Index entries for sequences related to factorial numbers.

A103774 is the non-strict version.
A337073 is the version for superprimorials, with non-strict version A337072.
A001055 counts factorizations.
A045778 counts strict factorizations.
A048656 counts squarefree divisors of factorials.
A050320 counts factorizations into squarefree numbers.
A050326 counts strict factorizations into squarefree numbers.
A050342 counts set-systems by total sum.
A076716 counts factorizations of factorials.
A116539 counts set-systems covering an initial interval.
A157612 counts strict factorizations of factorials.
Cf. A000110, A005117, A008480, A089259, A116540, A124010, A318360.
Factorial numbers: A000142, A007489, A022559, A027423, A071626, A325272, A325617, A336498.

yst[n_]:=yst[n]=If[n<=1,{{}},Join@@Table[Map[Prepend[#,d]&,Select[yst[n/d],Min@@#>d&]],{d,Select[Rest[Divisors[n]],SquareFreeQ]}]];
Table[Length[yst[n!]],{n,15}] (* Gus Wiseman, Aug 21 2020 *)

a(n) = 0 for n > 7;

a(n) = A050326(A000142(n)).

A318370 Number of non-isomorphic strict set multipartitions (sets of sets) of the multiset of prime indices of n.

Original entry on oeis.org

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

Offset: 1

Gus Wiseman, Aug 24 2018

nonn

			Non-isomorphic representatives of the a(180) = 4 strict set multipartitions of {1,1,2,2,3}:
  {{1,2},{1,2,3}}
  {{1},{2},{1,2,3}}
  {{1},{1,2},{2,3}}
  {{1},{2},{3},{1,2}}

Cf. A007716, A045778, A049311, A050326, A056239, A112798, A116539, A116540, A292432, A292444, A293511, A318284, A318360, A318369.

A322705 Number of k-uniform k-regular hypergraphs spanning n vertices, for some 1 <= k <= n.

Original entry on oeis.org

1, 1, 1, 2, 5, 26, 472, 23342

Offset: 0

Gus Wiseman, Dec 23 2018

We define a hypergraph to be any finite set of finite nonempty sets. A hypergraph is k-uniform if all edges contain exactly k vertices, and k-regular if all vertices belong to exactly k edges. The span of a hypergraph is the union of its edges.

			The a(3) = 2 hypergraphs:
  {{1},{2},{3}}
  {{1,2},{1,3},{2,3}}
The a(4) = 5 hypergraphs:
  {{1},{2},{3},{4}}
  {{1,2},{1,3},{2,4},{3,4}}
  {{1,2},{1,4},{2,3},{3,4}}
  {{1,3},{1,4},{2,3},{2,4}}
  {{1,2,3},{1,2,4},{1,3,4},{2,3,4}}
The a(5) = 26 hypergraphs:
  {{1},{2},{3},{4},{5}}
  {{1,2},{1,3},{2,4},{3,5},{4,5}}
  {{1,2},{1,3},{2,5},{3,4},{4,5}}
  {{1,2},{1,4},{2,3},{3,5},{4,5}}
  {{1,2},{1,4},{2,5},{3,4},{3,5}}
  {{1,2},{1,5},{2,3},{3,4},{4,5}}
  {{1,2},{1,5},{2,4},{3,4},{3,5}}
  {{1,3},{1,4},{2,3},{2,5},{4,5}}
  {{1,3},{1,4},{2,4},{2,5},{3,5}}
  {{1,3},{1,5},{2,3},{2,4},{4,5}}
  {{1,3},{1,5},{2,4},{2,5},{3,4}}
  {{1,4},{1,5},{2,3},{2,4},{3,5}}
  {{1,4},{1,5},{2,3},{2,5},{3,4}}
  {{1,2,3},{1,2,4},{1,3,5},{2,4,5},{3,4,5}}
  {{1,2,3},{1,2,4},{1,4,5},{2,3,5},{3,4,5}}
  {{1,2,3},{1,2,5},{1,3,4},{2,4,5},{3,4,5}}
  {{1,2,3},{1,2,5},{1,4,5},{2,3,4},{3,4,5}}
  {{1,2,3},{1,3,4},{1,4,5},{2,3,5},{2,4,5}}
  {{1,2,3},{1,3,5},{1,4,5},{2,3,4},{2,4,5}}
  {{1,2,4},{1,2,5},{1,3,4},{2,3,5},{3,4,5}}
  {{1,2,4},{1,2,5},{1,3,5},{2,3,4},{3,4,5}}
  {{1,2,4},{1,3,4},{1,3,5},{2,3,5},{2,4,5}}
  {{1,2,4},{1,3,5},{1,4,5},{2,3,4},{2,3,5}}
  {{1,2,5},{1,3,4},{1,3,5},{2,3,4},{2,4,5}}
  {{1,2,5},{1,3,4},{1,4,5},{2,3,4},{2,3,5}}
  {{1,2,3,4},{1,2,3,5},{1,2,4,5},{1,3,4,5},{2,3,4,5}}

Row sums of A322706.

Cf. A005176, A058891, A059441, A116539, A295193, A299353, A306021, A319056, A319189, A319190, A319612, A321721, A322704.

Table[Sum[SeriesCoefficient[Product[1+Times@@x/@s,{s,Subsets[Range[n],{k}]}],Sequence@@Table[{x[i],0,k},{i,n}]],{k,1,n}],{n,1,6}]

A370165 Number of labeled loop-graphs covering n vertices without a non-loop edge with loops at both ends.

Original entry on oeis.org

1, 1, 4, 29, 400, 10289, 496548, 45455677, 7983420736, 2716094133313, 1803251169342820, 2348787270663723581, 6024912118926389490448, 30516957491540079828757553, 305811332460677494410532494660, 6071677788061208810793717466942237

Offset: 0

Gus Wiseman, Feb 12 2024

nonn

Number of ways to choose a stable vertex set of a simple graph with n vertices.

			The a(3) = 29 loop-graphs (loops shown as singletons):
  {1,23}   {1,2,3}     {1,2,13,23}
  {2,13}   {1,2,13}    {1,3,12,23}
  {3,12}   {1,2,23}    {2,3,12,13}
  {12,13}  {1,3,12}    {1,12,13,23}
  {12,23}  {1,3,23}    {2,12,13,23}
  {13,23}  {2,3,12}    {3,12,13,23}
           {2,3,13}
           {1,12,13}
           {1,12,23}
           {1,13,23}
           {2,12,13}
           {2,12,23}
           {2,13,23}
           {3,12,13}
           {3,12,23}
           {3,13,23}
           {12,13,23}

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

Without loops we have A006129, connected A001187.
The non-covering version is A079491.
The unlabeled version is A370166, non-covering A339832.
A000085, A100861, A111924 count set partitions into singletons or pairs.
A000666 counts unlabeled loop-graphs, covering A322700.
A006125 counts labeled loop-graphs (shifted left), covering A322661.
Cf. A048291, A062740, A116539, A320461, A322635.

Table[Length[Select[Subsets[Subsets[Range[n],{1,2}]], Union@@#==Range[n]&&!MatchQ[#, {_,{x_},_,{y_},_,{x_,y_},_}]&]],{n,0,5}]

seq(n)={Vec(serlaplace(sum(k=0, n, exp((2^k-1)*x + O(x*x^n))*2^(k*(k-1)/2)*x^k/k!)))} \\ Andrew Howroyd, Feb 20 2024

Inverse binomial transform of A079491.

E.g.f.: Sum_{k >= 0} exp((2^k-1)*x)*2^(k*(k-1)/2)*x^k/k!. - Andrew Howroyd, Feb 20 2024

cp's OEIS Frontend

A382430 Number of non-isomorphic finite multisets of size n that cannot be partitioned into sets with distinct sums.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A318371 Number of non-isomorphic strict set multipartitions (sets of sets) of a multiset whose multiplicities are the prime indices of n.

Views

Author

Keywords

Examples

Crossrefs

Formula

A331638 Number of binary matrices with nonzero rows, a total of n ones and each column with the same number of ones and columns in nonincreasing lexicographic order.

Views

Author

Keywords

Comments

Links

Crossrefs

Formula

A382458 Number of normal multisets of size n that can be partitioned into a set of sets in exactly one way.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A382459 Number of normal multisets of size n that can be partitioned into a set of sets with distinct sums in exactly one way.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A382523 Number of non-isomorphic finite multisets of size n that can be partitioned into sets with distinct sums.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A103775 Number of ways to write n! as product of distinct squarefree numbers.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Formula

A318370 Number of non-isomorphic strict set multipartitions (sets of sets) of the multiset of prime indices of n.

Views

Author

Keywords

Examples

Crossrefs

A322705 Number of k-uniform k-regular hypergraphs spanning n vertices, for some 1 <= k <= n.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A370165 Number of labeled loop-graphs covering n vertices without a non-loop edge with loops at both ends.

Views