A316983 -id:A316983 - cp's OEIS frontend

A340600 Number of non-isomorphic balanced multiset partitions of weight n.

1, 1, 0, 4, 7, 16, 52, 206, 444, 1624, 5462, 19188, 62890, 215367, 765694, 2854202, 10634247, 39842786, 150669765, 581189458, 2287298588, 9157598354, 37109364812, 151970862472, 629048449881, 2635589433705, 11184718653563, 48064965080106, 208988724514022, 918639253237646, 4079974951494828

Offset: 0

Gus Wiseman, Feb 05 2021

nonn

We define a multiset partition to be balanced if it has exactly as many parts as the greatest size of a part.

			Non-isomorphic representatives of the a(1) = 1 through a(5) = 16 multiset partitions (empty column indicated by dot):
  {{1}}  .  {{1},{1,1}}  {{1,1},{1,1}}  {{1},{1},{1,1,1}}
            {{1},{2,2}}  {{1,1},{2,2}}  {{1},{1},{1,2,2}}
            {{1},{2,3}}  {{1,2},{1,2}}  {{1},{1},{2,2,2}}
            {{2},{1,2}}  {{1,2},{2,2}}  {{1},{1},{2,3,3}}
                         {{1,2},{3,3}}  {{1},{1},{2,3,4}}
                         {{1,2},{3,4}}  {{1},{2},{1,2,2}}
                         {{1,3},{2,3}}  {{1},{2},{2,2,2}}
                                        {{1},{2},{2,3,3}}
                                        {{1},{2},{3,3,3}}
                                        {{1},{2},{3,4,4}}
                                        {{1},{2},{3,4,5}}
                                        {{1},{3},{2,3,3}}
                                        {{1},{4},{2,3,4}}
                                        {{2},{2},{1,2,2}}
                                        {{2},{3},{1,2,3}}
                                        {{3},{3},{1,2,3}}

The version for partitions is A047993.
The co-balanced version is A319616.
The cross-balanced version is A340651.
The twice-balanced version is A340652.
The version for factorizations is A340653.
A007716 counts non-isomorphic multiset partitions.
A007718 counts non-isomorphic connected multiset partitions.
A316980 counts non-isomorphic strict multiset partitions.
Other balance-related sequences:
- A098124 counts balanced compositions.
- A106529 lists balanced numbers.
- A340596 counts co-balanced factorizations.
- A340597 lists numbers with an alt-balanced factorization.
- A340598 counts balanced set partitions.
- A340599 counts alt-balanced factorizations.
Cf. A001055, A006141, A007717, A316983, A320663, A324522, A340654, A340655.

\\ See A340652 for G.
seq(n)={Vec(1 + sum(k=1,n,polcoef(G(n,n,k,y),k,y) - polcoef(G(n,n,k-1,y),k,y)))} \\ Andrew Howroyd, Jan 15 2024

a(11) onwards from Andrew Howroyd, Jan 15 2024

A320328 Number of square multiset partitions of integer partitions of n.

Original entry on oeis.org

1, 1, 2, 3, 6, 11, 20, 36, 65, 117, 214, 382, 679

Offset: 0

Gus Wiseman, Oct 11 2018

A multiset partition is square if its length is equal to its number of distinct atoms.

			The a(1) = 1 through a(6) = 20 square partitions:
  {{1}}  {{2}}    {{3}}      {{4}}        {{5}}          {{6}}
         {{1,1}}  {{1,1,1}}  {{2,2}}      {{1},{4}}      {{3,3}}
                  {{1},{2}}  {{1},{3}}    {{2},{3}}      {{1},{5}}
                             {{1,1,1,1}}  {{1},{1,3}}    {{2,2,2}}
                             {{1},{1,2}}  {{1},{2,2}}    {{2},{4}}
                             {{2},{1,1}}  {{2},{1,2}}    {{1},{1,4}}
                                          {{3},{1,1}}    {{4},{1,1}}
                                          {{1,1,1,1,1}}  {{1},{1,1,3}}
                                          {{1},{1,1,2}}  {{1,1},{1,3}}
                                          {{1,1},{1,2}}  {{1},{1,2,2}}
                                          {{2},{1,1,1}}  {{1,1},{2,2}}
                                                         {{1,2},{1,2}}
                                                         {{1},{2},{3}}
                                                         {{2},{1,1,2}}
                                                         {{3},{1,1,1}}
                                                         {{1,1,1,1,1,1}}
                                                         {{1},{1,1,1,2}}
                                                         {{1,1},{1,1,2}}
                                                         {{1,2},{1,1,1}}
                                                         {{2},{1,1,1,1}}

Cf. A000219, A001970, A047968, A050342, A089259, A141268, A261049, A289501, A305551, A316983, A319066, A319312, A319616, A320330, A320331.

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[Join@@mps/@IntegerPartitions[n],Length[#]==Length[Union@@#]&]],{n,8}]

A320808 Regular tetrangle where T(n,k,i) is the number of nonnegative integer matrices up to row and column permutations with no zero rows or columns and k nonzero entries summing to n, with i columns.

Original entry on oeis.org

1, 0, 0, 1, 0, 0, 1, 0, 1, 2, 0, 0, 1, 0, 1, 2, 0, 1, 2, 3, 0, 0, 1, 0, 2, 4, 0, 1, 5, 4, 0, 1, 5, 5, 5, 0, 0, 1, 0, 2, 4, 0, 2, 10, 8, 0, 1, 9, 13, 7, 0, 1, 5, 12, 9, 7, 0, 0, 1, 0, 3, 6, 0, 3, 16, 12, 0, 2, 24, 33, 16, 0, 1, 14, 36, 29, 12, 0, 1, 9, 23, 29

Offset: 1

Gus Wiseman, Nov 09 2018

			Tetrangle begins:
  1  0    0      0        0          0
     0 1  0 1    0 1      0 1        0 1
          0 1 2  0 1 2    0 2 4      0 2 4
                 0 1 2 3  0 1 5 4    0 2 10 8
                          0 1 5 5 5  0 1 9 13 7
                                     0 1 5 12 9 7

Triangle sums are A007716. Triangle of row sums is A320801. Triangle of column sums is A317533. Triangle of last columns (without its leading column 1,0,0,0,...) is A055884.

Cf. A000219, A008284, A316980, A316983, A318805, A319616, A320796, A321194.

A104601 Triangle T(r,n) read by rows: number of n X n (0,1)-matrices with exactly r entries equal to 1 and no zero row or columns.

Original entry on oeis.org

1, 0, 2, 0, 4, 6, 0, 1, 45, 24, 0, 0, 90, 432, 120, 0, 0, 78, 2248, 4200, 720, 0, 0, 36, 5776, 43000, 43200, 5040, 0, 0, 9, 9066, 222925, 755100, 476280, 40320, 0, 0, 1, 9696, 727375, 6700500, 13003620, 5644800, 362880, 0, 0, 0, 7480, 1674840

Offset: 1

Ralf Stephan, Mar 27 2005

			1
0,2
0,4,6
0,1,45,24
0,0,90,432,120
0,0,78,2248,4200,720
0,0,36,5776,43000,43200,5040
0,0,9,9066,222925,755100,476280,40320
0,0,1,9696,727375,6700500,13003620,5644800,362880
0,0,0,7480,1674840,37638036,179494350,226262400,71850240,3628800

M. Maia and M. Mendez, On the arithmetic product of combinatorial species, arXiv:math/0503436 [math.CO], 2005.

Right-edge diagonals include A000142, A055602, A055603. Row sums are in A104602.
Column sums are in A048291. The triangle read by columns = A055599.
Cf. A049311, A054976, A057150, A057151, A101370, A120732, A120733, A138178, A316983, A319616.

t[r_, n_] := Sum[ Sum[ (-1)^(2n - d - k/d)*Binomial[n, d]*Binomial[n, k/d]*Binomial[k, r], {d, Divisors[k]}], {k, r, n^2}]; Flatten[ Table[t[r, n], {r, 1, 10}, {n, 1, r}]] (* Jean-François Alcover, Jun 27 2012, from formula *)
Table[Length[Select[Subsets[Tuples[Range[n],2],{n}],Union[First/@#]==Union[Last/@#]==Range[k]&]],{n,6},{k,n}] (* Gus Wiseman, Nov 14 2018 *)

T(r, n) = Sum{l>=r, Sum{d|l, (-1)^(2n-d-l/d)*C(n, d)*C(n, l/d)*C(l, r) }}.

E.g.f.: Sum(((1+x)^n-1)^n*exp((1-(1+x)^n)*y)*y^n/n!,n=0..infinity). - Vladeta Jovovic, Feb 24 2008

A135588 Number of symmetric (0,1)-matrices with exactly n entries equal to 1 and no zero rows or columns.

Original entry on oeis.org

1, 1, 2, 6, 20, 74, 302, 1314, 6122, 29982, 154718, 831986, 4667070, 27118610, 163264862, 1013640242, 6488705638, 42687497378, 288492113950, 1998190669298, 14177192483742, 102856494496050, 762657487965086, 5771613810502002, 44555989658479726, 350503696871063138

Offset: 0

Vladeta Jovovic, Feb 25 2008, Mar 03 2008, Mar 04 2008

nonn

			From _Gus Wiseman_, Nov 14 2018: (Start)
The a(4) = 20 matrices:
  [11]
  [11]
.
  [110][101][100][100][011][010][010][001][001]
  [100][010][011][001][100][110][101][010][001]
  [001][100][010][011][100][001][010][101][110]
.
  [1000][1000][1000][1000][0100][0100][0010][0010][0001][0001]
  [0100][0100][0010][0001][1000][1000][0100][0001][0100][0010]
  [0010][0001][0100][0010][0010][0001][1000][1000][0010][0100]
  [0001][0010][0001][0100][0001][0010][0001][0100][1000][1000]
(End)

Alois P. Heinz, Table of n, a(n) for n = 0..721 (first 51 terms from Vincenzo Librandi)

Row sums of A135589.

Cf. A049311, A054976, A101370, A104601, A104602, A120733, A138178, A283877, A316983, A320796, A321401, A321405.

Table[Sum[SeriesCoefficient[(1+x)^k*(1+x^2)^(k*(k-1)/2)/2^(k+1),{x,0,n}],{k,0,Infinity}],{n,0,20}] (* Vaclav Kotesovec, Jul 02 2014 *)
Join[{1},  Table[Length[Select[Subsets[Tuples[Range[n], 2], {n}], And[Union[First/@#]==Range[Max@@First/@#], Union[Last/@#]==Range[Max@@Last/@#], Sort[Reverse/@#]==#]&]], {n, 5}]] (* Gus Wiseman, Nov 14 2018 *)

G.f.: Sum_{n>=0} (1+x)^n*(1+x^2)^binomial(n,2)/2^(n+1).

G.f.: Sum_{n>=0} (Sum_{k=0..n} (-1)^(n-k)*binomial(n,k)*(1+x)^k*(1+x^2)^binomial(k,2)).

A321645 Number of distinct row/column permutations of plane partitions of n.

Original entry on oeis.org

1, 1, 3, 11, 32, 96, 290, 864, 2502, 7134, 20081

Offset: 0

Gus Wiseman, Nov 15 2018

			The a(3) = 11 permutations of plane partitions:
  [3] [2 1] [1 2] [1 1 1]
.
  [2] [1 1] [1 1] [1] [1 0] [0 1]
  [1] [1 0] [0 1] [2] [1 1] [1 1]
.
  [1]
  [1]
  [1]

Cf. A000219, A001970, A007716, A008480, A068313, A114736, A120733, A316983, A319646.

Cf. A321646, A321647, A321648, A321652, A321653, A321655.

submultisetQ[M_,N_]:=Or[Length[M]==0,MatchQ[{Sort[List@@M],Sort[List@@N]},{{x_,Z___},{_,x_,W___}}/;submultisetQ[{Z},{W}]]];
multsubs[set_,k_]:=If[k==0,{{}},Join@@Table[Prepend[#,set[[i]]]&/@multsubs[Drop[set,i-1],k-1],{i,Length[set]}]];
Table[Length[Select[multsubs[Tuples[Range[n],2],n],And[Union[First/@#]==Range[Max@@First/@#],Union[Last/@#]==Range[Max@@Last/@#],OrderedQ[Sort[Map[Last,GatherBy[Sort[Reverse/@#],First],{2}],submultisetQ],submultisetQ],OrderedQ[Sort[Sort/@Map[Last,GatherBy[#,First],{2}],submultisetQ],submultisetQ]]&]],{n,6}]

A319639 Number of antichain covers of n vertices by distinct sets whose dual is also an antichain of distinct sets.

Original entry on oeis.org

1, 1, 1, 2, 20, 2043

Offset: 0

Gus Wiseman, Sep 25 2018

The dual of a multiset partition has, for each vertex, one block consisting of the indices (or positions) of the blocks containing that vertex, counted with multiplicity. For example, the dual of {{1,2},{2,2}} is {{1},{1,2,2}}.

			The a(1) = 1 through a(3) = 2 antichain covers:
1: {{1}}
2: {{1},{2}}
3: {{1},{2},{3}}
   {{1,2},{1,3},{2,3}}

Cf. A006126, A007716, A049311, A059201, A283877, A293606, A316980, A316983, A318099, A319558, A319616-A319646, A300913.

A319767 Number of non-isomorphic intersecting set systems spanning n vertices whose dual is also an intersecting set system.

Original entry on oeis.org

1, 1, 1, 5, 73

Offset: 0

Gus Wiseman, Sep 27 2018

The dual of a multiset partition has, for each vertex, one part consisting of the indices (or positions) of the parts containing that vertex, counted with multiplicity. For example, the dual of {{1,2},{2,2}} is {{1},{1,2,2}}.
A multiset partition is intersecting iff no two parts are disjoint. The dual of a multiset partition is intersecting iff every pair of distinct vertices appear together in some part.
The weight of a multiset partition is the sum of sizes of its parts. Weight is generally not the same as number of vertices.

			Non-isomorphic representatives of the a(1) = 1 through a(3) = 5 multiset partitions:
1: {{1}}
2: {{2},{1,2}}
3: {{3},{2,3},{1,2,3}}
   {{1,2},{1,3},{2,3}}
   {{1,3},{2,3},{1,2,3}}
   {{3},{1,3},{2,3},{1,2,3}}
   {{1,2},{1,3},{2,3},{1,2,3}}

Cf. A007716, A281116, A283877, A305854, A306006, A316980, A316983, A317757, A319616.

Cf. A319752, A319765, A319766, A319768, A319769, A319773, A319774.

A320800 Number of non-isomorphic multiset partitions of weight n in which both the multiset union of the parts and the multiset union of the dual parts are aperiodic.

Original entry on oeis.org

1, 1, 1, 5, 14, 78, 157, 881, 2267, 9257, 28397

Offset: 0

Gus Wiseman, Nov 02 2018

The latter condition is equivalent to the parts having relatively prime sizes.
A multiset is aperiodic if its multiplicities are relatively prime.
The dual of a multiset partition has, for each vertex, one part consisting of the indices (or positions) of the parts containing that vertex, counted with multiplicity. For example, the dual of {{1,2},{2,2}} is {{1},{1,2,2}}.
The weight of a multiset partition is the sum of sizes of its parts. Weight is generally not the same as number of vertices.

			Non-isomorphic representatives of the a(1) = 1 through a(4) = 14 multiset partitions:
  {{1}}  {{1},{2}}  {{1},{2,2}}    {{1},{2,2,2}}
                    {{1},{2,3}}    {{1},{2,3,3}}
                    {{2},{1,2}}    {{1},{2,3,4}}
                    {{1},{2},{2}}  {{2},{1,2,2}}
                    {{1},{2},{3}}  {{3},{1,2,3}}
                                   {{1},{1},{2,3}}
                                   {{1},{2},{2,2}}
                                   {{1},{2},{3,3}}
                                   {{1},{2},{3,4}}
                                   {{1},{3},{2,3}}
                                   {{2},{2},{1,2}}
                                   {{1},{2},{2},{2}}
                                   {{1},{2},{3},{3}}
                                   {{1},{2},{3},{4}}

Cf. A000740, A000837, A007716, A007916, A100953, A301700, A303386, A303431, A303546, A303547, A316983, A320801-A320810.

A322847 Numbers whose prime indices have no equivalent primes.

Original entry on oeis.org

1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 27, 28, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 44, 45, 46, 48, 49, 50, 51, 53, 54, 55, 56, 57, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 74, 75

Offset: 1

Gus Wiseman, Dec 28 2018

nonn

The complement is {13, 26, 29, 43, 47, 52, 58, 73, 79, 86, 94, ...}.
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.
In an integer partition, two primes are equivalent if each part has in its prime factorization the same multiplicity of both primes. For example, in (6,5) the primes {2,3} are equivalent while {2,5} and {3,5} are not. In (30,6) also, the primes {2,3} are equivalent, while {2,5} and {3,5} are not.
Also MM-numbers of T_0 multiset multisystems. A multiset multisystem is a finite multiset of finite multisets. The multiset multisystem with MM-number n is formed by taking the multiset of prime indices of each part of the multiset of prime indices 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 dual of a multiset multisystem has, for each vertex, one block consisting of the indices (or positions) of the parts containing that vertex, counted with multiplicity. For example, the dual of {{1,2},{2,2}} is {{1},{1,2,2}}. The T_0 condition means the dual is strict (no repeated parts).

			The prime indices of 339 are {2, 30}, in which the primes {3,5} are equivalent, so 339 is not in the sequence.

Cf. A056239, A059201, A112798, A302242, A316978, A316979, A316983, A319558, A319564, A319728, A322846.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
dual[eds_]:=Table[First/@Position[eds,x],{x,Union@@eds}];
Select[Range[100],UnsameQ@@dual[primeMS/@primeMS[#]]&]

cp's OEIS Frontend

A340600 Number of non-isomorphic balanced multiset partitions of weight n.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

PARI

Extensions

A320328 Number of square multiset partitions of integer partitions of n.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A320808 Regular tetrangle where T(n,k,i) is the number of nonnegative integer matrices up to row and column permutations with no zero rows or columns and k nonzero entries summing to n, with i columns.

Views

Author

Keywords

Examples

Crossrefs

A104601 Triangle T(r,n) read by rows: number of n X n (0,1)-matrices with exactly r entries equal to 1 and no zero row or columns.

Views

Author

Keywords

Examples

Links

Crossrefs

Programs

Mathematica

Formula

A135588 Number of symmetric (0,1)-matrices with exactly n entries equal to 1 and no zero rows or columns.

Views

Author

Keywords

Examples

Links

Crossrefs

Programs

Mathematica

Formula

A321645 Number of distinct row/column permutations of plane partitions of n.

Views

Author

Keywords

Examples

Crossrefs

Programs

Mathematica

A319639 Number of antichain covers of n vertices by distinct sets whose dual is also an antichain of distinct sets.

Views

Author

Keywords

Comments

Examples

Crossrefs

A319767 Number of non-isomorphic intersecting set systems spanning n vertices whose dual is also an intersecting set system.

Views

Author

Keywords

Comments

Examples

Crossrefs

A320800 Number of non-isomorphic multiset partitions of weight n in which both the multiset union of the parts and the multiset union of the dual parts are aperiodic.

Views

Author

Keywords

Comments

Examples

Crossrefs

A322847 Numbers whose prime indices have no equivalent primes.

Views

Author

Keywords

Comments