A330227 -id:A330227 - cp's OEIS frontend

A368094 Number of non-isomorphic set-systems of weight n contradicting a strict version of the axiom of choice.

0, 0, 0, 0, 1, 1, 5, 12, 36, 97, 291

Offset: 0

Gus Wiseman, Dec 23 2023

A set-system is a finite set of finite nonempty sets. The weight of a set-system is the sum of cardinalities of its elements. Weight is generally not the same as number of vertices.

The axiom of choice says that, given any set of nonempty sets Y, it is possible to choose a set containing an element from each. The strict version requires this set to have the same cardinality as Y, meaning no element is chosen more than once.

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

Wikipedia, Axiom of choice.

The case of unlabeled graphs is A140637, complement A134964.
The case of labeled graphs is A367867, complement A133686.
The labeled version is A367903, ranks A367907.
The complement is counted by A368095, connected A368410.
Repeats allowed: A368097, ranks A355529, complement A368098, ranks A368100.
Minimal multiset partitions of this type are ranked by A368187.
The connected case is A368409.
Factorizations of this type are counted by A368413, complement A368414.
Allowing repeated edges gives A368421, complement A368422.
A000110 counts set partitions, non-isomorphic A000041.
A003465 counts covering set-systems, unlabeled A055621.
A007716 counts non-isomorphic multiset partitions, connected A007718.
A058891 counts set-systems, unlabeled A000612, connected A323818.
A283877 counts non-isomorphic set-systems, connected A300913.
Cf. A302545, A306005, A316983, A317533, A319616, A321155, A321405, A326031, A330223, A330227, A367905.

sps[{}]:={{}};sps[set:{i_,_}]:=Join@@Function[s,Prepend[#,s]& /@ sps[Complement[set,s]]] /@ Cases[Subsets[set],{i,_}];
mpm[n_]:=Join@@Table[Union[Sort[Sort/@(#/.x_Integer:>s[[x]])]& /@ sps[Range[n]]], {s,Flatten[MapIndexed[Table[#2,{#1}]&,#]]& /@ IntegerPartitions[n]}];
brute[m_]:=First[Sort[Table[Sort[Sort /@ (m/.Rule@@@Table[{i,p[[i]]},{i,Length[p]}])], {p,Permutations[Union@@m]}]]];
Table[Length[Union[brute/@Select[mpm[n], UnsameQ@@#&&And@@UnsameQ@@@# && Select[Tuples[#], UnsameQ@@#&]=={}&]]],{n,0,8}]

A330098 Number of distinct multisets of multisets that can be obtained by permuting the vertices of the multiset of multisets with MM-number n.

Original entry on oeis.org

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, 1, 1, 1, 1, 2, 1, 2, 1, 2, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 2, 1, 1, 1, 2, 2, 2, 1, 1, 2, 2, 1, 2, 2, 1, 1, 1, 1, 1, 1, 1, 1, 2

Offset: 1

Gus Wiseman, Dec 09 2019

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 multiset of multisets 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 of multisets with MM-number 78 is {{},{1},{1,2}}.

a(n) is a divisor of A303975(n)!.

			The vertex-permutations of {{1,2},{2,3,3}} are:
  {{1,2},{1,3,3}}
  {{1,2},{2,3,3}}
  {{1,3},{1,2,2}}
  {{1,3},{2,2,3}}
  {{2,3},{1,1,2}}
  {{2,3},{1,1,3}}
so a(4927) = 6.

Positions of 1's are A330232.
Positions of first appearances are A330230 and A330233.
The BII-number version is A330231.
Cf. A001055, A003238, A007716, A055621, A056239, A112798, A302242, A303975, A322847, A330194, A330218, A330223, A330227, A330236.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
graprms[m_]:=Union[Table[Sort[Sort/@(m/.Rule@@@Table[{p[[i]],i},{i,Length[p]}])],{p,Permutations[Union@@m]}]];
Table[Length[graprms[primeMS/@primeMS[n]]],{n,100}]

A368098 Number of non-isomorphic multiset partitions of weight n satisfying a strict version of the axiom of choice.

Original entry on oeis.org

1, 1, 3, 7, 21, 54, 165, 477, 1501, 4736, 15652

Offset: 0

Gus Wiseman, Dec 25 2023

A multiset partition is a finite multiset of finite nonempty multisets. The weight of a multiset partition is the sum of cardinalities of its elements. Weight is generally not the same as number of vertices.

The axiom of choice says that, given any set of nonempty sets Y, it is possible to choose a set containing an element from each. The strict version requires this set to have the same cardinality as Y, meaning no element is chosen more than once.

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

Wikipedia, Axiom of choice.

The case of labeled graphs is A133686, complement A367867.
The case of unlabeled graphs is A134964, complement A140637 (apparently).
Set-systems of this type are A367902, ranks A367906, connected A368410.
The complimentary set-systems are A367903, ranks A367907, connected A368409.
For set-systems we have A368095, complement A368094.
The complement is A368097, ranks A355529.
These multiset partitions have ranks A368100.
The connected case is A368412, complement A368411.
Factorizations of this type are counted by A368414, complement A368413.
For set multipartitions we have A368422, complement A368421.
A000110 counts set partitions, non-isomorphic A000041.
A003465 counts covering set-systems, unlabeled A055621.
A007716 counts non-isomorphic multiset partitions, connected A007718.
A058891 counts set-systems, unlabeled A000612, connected A323818.
A283877 counts non-isomorphic set-systems, connected A300913.
Cf. A302545, A306005, A316983, A317533, A319616, A330223, A330227, A368187.

sps[{}]:={{}};sps[set:{i_,_}]:=Join@@Function[s,Prepend[#,s]& /@ sps[Complement[set,s]]] /@ Cases[Subsets[set],{i,_}];
mpm[n_]:=Join@@Table[Union[Sort[Sort/@(#/.x_Integer:>s[[x]])]& /@ sps[Range[n]]], {s,Flatten[MapIndexed[Table[#2,{#1}]&,#]]& /@ IntegerPartitions[n]}];
brute[m_]:=First[Sort[Table[Sort[Sort /@ (m/.Rule@@@Table[{i,p[[i]]},{i,Length[p]}])], {p,Permutations[Union@@m]}]]];
Table[Length[Union[brute/@Select[mpm[n], Select[Tuples[#],UnsameQ@@#&]!={}&]]], {n,0,6}]

A330223 Number of non-isomorphic achiral multiset partitions of weight n.

Original entry on oeis.org

1, 1, 4, 5, 12, 9, 30, 17, 52, 44, 94, 58, 211, 103, 302, 242, 552, 299, 1024, 492, 1592, 1007, 2523, 1257, 4636, 2000, 6661, 3705, 10823, 4567, 18147, 6844, 26606, 12272, 40766, 15056, 67060, 21639, 95884, 37357, 146781, 44585, 230098, 63263, 330889, 106619, 491182, 124756

Offset: 0

Gus Wiseman, Dec 07 2019

A multiset partition is a finite multiset of finite nonempty multisets. It is achiral if it is not changed by any permutation of the vertices.

			Non-isomorphic representatives of the a(1) = 1 through a(5) = 9 multiset partitions:
  {1}  {11}    {111}      {1111}        {11111}
       {12}    {123}      {1122}        {12345}
       {1}{1}  {1}{11}    {1234}        {1}{1111}
       {1}{2}  {1}{1}{1}  {1}{111}      {11}{111}
               {1}{2}{3}  {11}{11}      {1}{1}{111}
                          {11}{22}      {1}{11}{11}
                          {12}{12}      {1}{1}{1}{11}
                          {1}{1}{11}    {1}{1}{1}{1}{1}
                          {1}{2}{12}    {1}{2}{3}{4}{5}
                          {1}{1}{1}{1}
                          {1}{1}{2}{2}
                          {1}{2}{3}{4}
Non-isomorphic representatives of the a(6) = 30 multiset partitions:
  {111111}  {1}{11111}  {1}{1}{1111}  {1}{1}{1}{111}  {1}{1}{1}{1}{11}
  {111222}  {11}{1111}  {1}{11}{111}  {1}{1}{11}{11}  {1}{1}{2}{2}{12}
  {112233}  {111}{111}  {11}{11}{11}  {1}{2}{11}{22}
  {123456}  {111}{222}  {11}{12}{22}  {1}{2}{12}{12}
            {112}{122}  {11}{22}{33}  {1}{2}{3}{123}    {1}{1}{1}{1}{1}{1}
            {12}{1122}  {1}{2}{1122}                    {1}{1}{1}{2}{2}{2}
            {123}{123}  {12}{12}{12}                    {1}{1}{2}{2}{3}{3}
                        {12}{13}{23}                    {1}{2}{3}{4}{5}{6}

Planted achiral trees are A003238.
Achiral set-systems are counted by A083323.
BII-numbers of achiral set-systems are A330217.
Achiral integer partitions are counted by A330224.
Non-isomorphic fully chiral multiset partitions are A330227.
MM-numbers of achiral multisets of multisets are A330232.
Achiral factorizations are A330234.
Cf. A001055, A007716, A283877, A317533, A330098, A330233.

a(10)-a(11) and a(13) from Erich Friedman, Nov 20 2024
a(12) from Bert Dobbelaere, Apr 29 2025
More terms from Bert Dobbelaere, May 02 2025

A330229 Number of fully chiral set-systems covering n vertices.

Original entry on oeis.org

1, 1, 2, 42, 21336

Offset: 0

Gus Wiseman, Dec 08 2019

A set-system is a finite set of finite nonempty sets. It is fully chiral if every permutation of the vertices gives a different representative.

			The a(3) = 42 set-systems:
  {1}{2}{13}    {1}{2}{12}{13}    {1}{2}{12}{13}{123}
  {1}{2}{23}    {1}{2}{12}{23}    {1}{2}{12}{23}{123}
  {1}{3}{12}    {1}{3}{12}{13}    {1}{3}{12}{13}{123}
  {1}{3}{23}    {1}{3}{13}{23}    {1}{3}{13}{23}{123}
  {2}{3}{12}    {2}{3}{12}{23}    {2}{3}{12}{23}{123}
  {2}{3}{13}    {2}{3}{13}{23}    {2}{3}{13}{23}{123}
  {1}{12}{23}   {1}{2}{13}{123}
  {1}{13}{23}   {1}{2}{23}{123}
  {2}{12}{13}   {1}{3}{12}{123}
  {2}{13}{23}   {1}{3}{23}{123}
  {3}{12}{13}   {2}{3}{12}{123}
  {3}{12}{23}   {2}{3}{13}{123}
  {1}{12}{123}  {1}{12}{23}{123}
  {1}{13}{123}  {1}{13}{23}{123}
  {2}{12}{123}  {2}{12}{13}{123}
  {2}{23}{123}  {2}{13}{23}{123}
  {3}{13}{123}  {3}{12}{13}{123}
  {3}{23}{123}  {3}{12}{23}{123}

The non-covering version is A330282.
Costrict (or T_0) covering set-systems are A059201.
BII-numbers of fully chiral set-systems are A330226.
Non-isomorphic, fully chiral multiset partitions are A330227.
Fully chiral partitions are counted by A330228.
Fully chiral covering set-systems are A330229.
Fully chiral factorizations are A330235.
MM-numbers of fully chiral multisets of multisets are A330236.
Cf. A000612, A055621, A083323, A283877, A319559, A319564, A330224, A330234.

graprms[m_]:=Union[Table[Sort[Sort/@(m/.Rule@@@Table[{p[[i]],i},{i,Length[p]}])],{p,Permutations[Union@@m]}]];
Table[Length[Select[Subsets[Subsets[Range[n],{1,n}]],Union@@#==Range[n]&&Length[graprms[#]]==n!&]],{n,0,3}]

Binomial transform is A330282.

A330236 MM-numbers of fully chiral multisets of multisets.

Original entry on oeis.org

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

Offset: 1

Gus Wiseman, Dec 10 2019

nonn

A multiset of multisets is fully chiral every permutation of the vertices gives a different representative.

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 of multisets 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 of multisets with MM-number 78 is {{},{1},{1,2}}.

			The sequence of all fully chiral multisets of multisets together with their MM-numbers begins:
   1:             18: {}{1}{1}      37: {112}          57: {1}{111}
   2: {}          19: {111}         38: {}{111}        59: {7}
   3: {1}         20: {}{}{2}       39: {1}{12}        61: {122}
   4: {}{}        21: {1}{11}       40: {}{}{}{2}      62: {}{5}
   5: {2}         22: {}{3}         41: {6}            63: {1}{1}{11}
   6: {}{1}       23: {22}          42: {}{1}{11}      64: {}{}{}{}{}{}
   7: {11}        24: {}{}{}{1}     44: {}{}{3}        65: {2}{12}
   8: {}{}{}      25: {2}{2}        45: {1}{1}{2}      67: {8}
   9: {1}{1}      27: {1}{1}{1}     46: {}{22}         68: {}{}{4}
  10: {}{2}       28: {}{}{11}      48: {}{}{}{}{1}    69: {1}{22}
  11: {3}         31: {5}           49: {11}{11}       70: {}{2}{11}
  12: {}{}{1}     32: {}{}{}{}{}    50: {}{2}{2}       71: {113}
  14: {}{11}      34: {}{4}         53: {1111}         72: {}{}{}{1}{1}
  16: {}{}{}{}    35: {2}{11}       54: {}{1}{1}{1}    74: {}{112}
  17: {4}         36: {}{}{1}{1}    56: {}{}{}{11}     75: {1}{2}{2}
The complement starts: {13, 15, 26, 29, 30, 33, 43, 47, 51, 52, 55, 58, 60, 66, 73, 79, 85, 86, 93, 94}.

Costrict (or T_0) factorizations are A316978.
BII-numbers of fully chiral set-systems are A330226.
Non-isomorphic fully chiral multiset partitions are A330227.
Full chiral partitions are A330228.
Fully chiral covering set-systems are A330229.
Fully chiral factorizations are A330235.
Cf. A001055, A007716, A083323, A112798, A303975, A317533, A330098, A330223, A330224, A330232.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
graprms[m_]:=Union[Table[Sort[Sort/@(m/.Rule@@@Table[{p[[i]],i},{i,Length[p]}])],{p,Permutations[Union@@m]}]];
Select[Range[100],Length[graprms[primeMS/@primeMS[#]]]==Length[Union@@primeMS/@primeMS[#]]!&]

Numbers n such that A330098(n) = A303975(n)!.

A330230 Least MM-number of a multiset of multisets with n distinct representatives obtainable by permuting the vertices.

Original entry on oeis.org

1, 35, 141, 1713, 28011, 355

Offset: 1

Gus Wiseman, Dec 09 2019

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 of multisets 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 of multisets with MM-number 78 is {{},{1},{1,2}}.

			The sequence of terms together with their corresponding multisets of multisets begins:
      1: {}
     35: {{2},{1,1}}
    141: {{1},{2,3}}
   1713: {{1},{2,3,4}}
  28011: {{1},{2,3,4,5}}
    355: {{2},{1,1,3}}

The BII-number version is A330218.
Positions of first appearances in A330098.
The sorted version is A330233.
MM-numbers of achiral multisets of multisets are A330232.
MM-numbers of fully-chiral multisets of multisets are A330236.
Cf. A001055, A003238, A007716, A056239, A112798, A302242, A303975, A322847, A330103, A330223, A330227, A330231, A330236.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
graprms[m_]:=Union[Table[Sort[Sort/@(m/.Apply[Rule,Table[{p[[i]],i},{i,Length[p]}],{1}])],{p,Permutations[Union@@m]}]];
dv=Table[Length[graprms[primeMS/@primeMS[n]]],{n,1000}];
Table[Position[dv,i][[1,1]],{i,First[Split[Union[dv],#1+1==#2&]]}]

A330226 BII-numbers of fully chiral set-systems.

Original entry on oeis.org

0, 1, 2, 5, 6, 8, 13, 14, 17, 19, 22, 23, 24, 26, 28, 29, 34, 35, 37, 39, 40, 41, 44, 46, 49, 50, 57, 58, 69, 70, 77, 78, 81, 83, 86, 87, 88, 90, 92, 93, 98, 99, 101, 103, 104, 105, 108, 110, 113, 114, 121, 122, 128, 133, 134, 145, 150, 151, 152, 156, 157, 162

Offset: 1

Gus Wiseman, Dec 08 2019

nonn

A set-system is a finite set of finite nonempty sets. It is fully chiral if every permutation of the vertices gives a different representative.

A binary index of n is any position of a 1 in its reversed binary expansion. The binary indices of n are row n of A048793. We define the set-system with BII-number n to be obtained by taking the binary indices of each binary index of n. Every set-system has a different BII-number. For example, 18 has reversed binary expansion (0,1,0,0,1), and since the binary indices of 2 and 5 are {2} and {1,3} respectively, the BII-number of {{2},{1,3}} is 18. Elements of a set-system are sometimes called edges.

			The sequence of all fully chiral set-systems together with their BII-numbers begins:
   0: {}
   1: {{1}}
   2: {{2}}
   5: {{1},{1,2}}
   6: {{2},{1,2}}
   8: {{3}}
  13: {{1},{1,2},{3}}
  14: {{2},{1,2},{3}}
  17: {{1},{1,3}}
  19: {{1},{2},{1,3}}
  22: {{2},{1,2},{1,3}}
  23: {{1},{2},{1,2},{1,3}}
  24: {{3},{1,3}}
  26: {{2},{3},{1,3}}
  28: {{3},{1,2},{1,3}}
  29: {{1},{3},{1,2},{1,3}}
  34: {{2},{2,3}}
  35: {{1},{2},{2,3}}
  37: {{1},{1,2},{2,3}}
  39: {{1},{2},{1,2},{2,3}}
For example, 28 is in the sequence because all six permutations give different representatives, namely:
  {{1},{1,2},{2,3}}
  {{1},{1,3},{2,3}}
  {{2},{1,2},{1,3}}
  {{2},{1,3},{2,3}}
  {{3},{1,2},{1,3}}
  {{3},{1,2},{2,3}}

A subset of A326947.
Achiral set-systems are counted by A083323.
BII-numbers of achiral set-systems are A330217.
Non-isomorphic, fully chiral multiset partitions are A330227.
Fully chiral partitions are counted by A330228.
Fully chiral covering set-systems are A330229.
Fully chiral factorizations are A330235.
MM-numbers of fully chiral multisets of multisets are A330236.
Cf. A000120, A000612, A016031, A048793, A070939, A326031, A326702, A330218, A330231, A330232.

bpe[n_]:=Join@@Position[Reverse[IntegerDigits[n,2]],1];
graprms[m_]:=Union[Table[Sort[Sort/@(m/.Rule@@@Table[{p[[i]],i},{i,Length[p]}])],{p,Permutations[Union@@m]}]];
Select[Range[0,100],Length[graprms[bpe/@bpe[#]]]==Length[Union@@bpe/@bpe[#]]!&]

A330228 Number of fully chiral integer partitions of n.

Original entry on oeis.org

1, 1, 2, 3, 5, 6, 9, 12, 18, 25, 33, 45, 61, 80, 106, 140, 176, 232, 293, 381, 476, 615, 764, 975, 1191, 1511, 1849, 2322, 2812, 3517, 4231, 5240, 6297, 7736, 9260, 11315, 13468, 16378, 19485, 23531, 27851, 33525, 39585, 47389, 55844, 66517, 78169, 92810

Offset: 0

Gus Wiseman, Dec 08 2019

nonn

A multiset partition is fully chiral if every permutation of the vertices gives a different representative. An integer partition is fully chiral if taking the multiset of prime indices of each part gives a fully chiral multiset of multisets.

			The a(1) = 1 through a(7) = 12 partitions:
  (1)  (2)   (3)    (4)     (5)      (33)      (7)
       (11)  (21)   (22)    (41)     (42)      (43)
             (111)  (31)    (221)    (51)      (322)
                    (211)   (311)    (222)     (331)
                    (1111)  (2111)   (411)     (421)
                            (11111)  (2211)    (511)
                                     (3111)    (2221)
                                     (21111)   (4111)
                                     (111111)  (22111)
                                               (31111)
                                               (211111)
                                               (1111111)

The Heinz numbers of these partitions are given by A330236.
Costrict (or T_0) partitions are A319564.
Achiral partitions are A330224.
BII-numbers of fully chiral set-systems are A330226.
Non-isomorphic, fully chiral multiset partitions are A330227.
Fully chiral covering set-systems are A330229.
Fully chiral factorizations are A330235.
Cf. A001055, A007716, A322847, A330098, A330223.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
graprms[m_]:=Union[Table[Sort[Sort/@(m/.Rule@@@Table[{p[[i]],i},{i,Length[p]}])],{p,Permutations[Union@@m]}]];
Table[Length[Select[IntegerPartitions[n],Length[graprms[primeMS/@#]]==Length[Union@@primeMS/@#]!&]],{n,0,15}]

A330233 Least MM-numbers of multisets of multisets with a given number of distinct representatives (obtainable by vertex-permutations).

Original entry on oeis.org

1, 35, 141, 1713, 28011, 355, 34567, 4045, 54849, 64615, 15265, 95363, 126841

Offset: 1

Gus Wiseman, Dec 09 2019

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 of multisets 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 of multisets with MM-number 78 is {{},{1},{1,2}}.

			The sequence of terms together with their corresponding multisets of multisets begins:
       1: {}
      35: {{2},{1,1}}
     141: {{1},{2,3}}
     355: {{2},{1,1,3}}
    1713: {{1},{2,3,4}}
    4045: {{2},{1,1,3,4}}
   15265: {{2},{1,4},{1,1,3}}
   28011: {{1},{2,3,4,5}}
   34567: {{1,2},{3,4,5}}
   54849: {{1},{2,3},{4,5}}
   64615: {{2},{1,1,3,4,5}}
   95363: {{2,3},{1,1,4,5}}
  126841: {{3},{1,2},{1,4,5}}

Sorted positions of first appearances in A330098.
The unsorted version is A330230.
The BII-number version is A330218.
MM-numbers of achiral multisets of multisets are A330232.
MM-numbers of fully-chiral multisets of multisets are A330236.
Cf. A001055, A003238, A007716, A056239, A112798, A302242, A303975, A322847, A330103, A330223, A330227, A330231.

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
graprms[m_]:=Union[Table[Sort[Sort/@(m/.Apply[Rule,Table[{p[[i]],i},{i,Length[p]}],{1}])],{p,Permutations[Union@@m]}]];
dv=Table[Length[graprms[primeMS/@primeMS[n]]],{n,1000}];
Table[Position[dv,i][[1,1]],{i,First/@Gather[dv]}]

cp's OEIS Frontend

A368094 Number of non-isomorphic set-systems of weight n contradicting a strict version of the axiom of choice.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A330098 Number of distinct multisets of multisets that can be obtained by permuting the vertices of the multiset of multisets with MM-number n.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A368098 Number of non-isomorphic multiset partitions of weight n satisfying a strict version of the axiom of choice.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

A330223 Number of non-isomorphic achiral multiset partitions of weight n.

Views

Author

Keywords

Comments

Examples

Crossrefs

Extensions

A330229 Number of fully chiral set-systems covering n vertices.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula

A330236 MM-numbers of fully chiral multisets of multisets.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula

A330230 Least MM-number of a multiset of multisets with n distinct representatives obtainable by permuting the vertices.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A330226 BII-numbers of fully chiral set-systems.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A330228 Number of fully chiral integer partitions of n.

Views

Author

Keywords