A319728 -id:A319728 - cp's OEIS frontend

A319564 Number of T_0 integer partitions of n.

1, 1, 2, 3, 5, 7, 10, 14, 21, 29, 40, 53, 73, 95, 128, 168, 221, 282, 368, 466, 599, 759, 962, 1201, 1513, 1881, 2345, 2901, 3590, 4407, 5416, 6614, 8083, 9827, 11937, 14442, 17458, 21021, 25299, 30347, 36363, 43438, 51843, 61705, 73384, 87054, 103149, 121949

Offset: 0

Gus Wiseman, Sep 23 2018

nonn

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}}. For an integer partition the T_0 condition means the dual of the multiset partition obtained by factoring each part into prime numbers is strict (no repeated blocks).

Also the number of integer partitions of n with no equivalent primes. 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. See A316978 for more examples.

Cf. A000009, A000041, A001970, A007716, A059201, A305148, A316978, A316979, A316983, A319558, A319616, A319728.

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}]
Table[Length[Select[IntegerPartitions[n],UnsameQ@@dual[primeMS/@#]&]],{n,20}]

A326977 Number of integer partitions of n such that the dual of the multiset partition obtained by factoring each part into prime numbers is a (strict) antichain, also called T_1 integer partitions.

Original entry on oeis.org

1, 1, 2, 3, 5, 7, 10, 14, 20, 27, 36, 49, 64, 85, 109, 141, 181, 234, 294, 375, 470, 589, 733, 917, 1131, 1401, 1720, 2113, 2581, 3153, 3833, 4655, 5631, 6801, 8192, 9849, 11816, 14148, 16899, 20153, 23990, 28503, 33815, 40038, 47330, 55858, 65841, 77475

Offset: 0

Gus Wiseman, Aug 13 2019

nonn

The dual of a multiset partition has, for each vertex, one edge consisting of the indices (or positions) of the edges containing that vertex, counted with multiplicity. For example, the dual of {{1,2},{2,3}} is {{1},{1,2},{2}}. An antichain is a set of multisets, none of which is a submultiset of any other.

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

T_0 integer partitions are A319564.
Set-systems whose dual is a (strict) antichain are A326965.
The version where the dual is a weak antichain is A326978.
T_1 factorizations (whose dual is a strict antichain) are A327012.
Cf. A000041, A319728, A326961, A326974, A326976, A326979.

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}];
stableQ[u_,Q_]:=!Apply[Or,Outer[#1=!=#2&&Q[#1,#2]&,u,u,1],{0,1}];
submultQ[cap_,fat_]:=And@@Function[i,Count[fat,i]>=Count[cap,i]]/@Union[List@@cap];
Table[Length[Select[IntegerPartitions[n],UnsameQ@@dual[primeMS/@#]&&stableQ[dual[primeMS/@#],submultQ]&]],{n,0,30}]

A326978 Number of integer partitions of n such that the dual of the multiset partition obtained by factoring each part into prime numbers is a weak antichain.

Original entry on oeis.org

1, 1, 2, 3, 5, 7, 11, 15, 21, 28, 38, 52, 68, 91, 116, 149, 191, 249, 311, 399, 498, 622, 773, 971, 1193, 1478, 1811, 2222, 2709, 3311, 4021, 4882, 5894, 7110, 8554, 10273, 12312, 14734, 17578, 20941, 24905, 29570, 35056, 41475, 48983, 57752, 68025, 79988

Offset: 0

Gus Wiseman, Aug 13 2019

nonn

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

A weak antichain is a multiset of multisets, none of which is a proper submultiset of any other.

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

Set-systems whose dual is a weak antichain are A326968.
Factorizations whose dual is a weak antichain are A326975.
The version where the dual is a strict antichain is A326977.
Cf. A000041, A319564, A319728, A326966, A326969, A326970, A326971, A326973.

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}];
stableQ[u_,Q_]:=!Apply[Or,Outer[#1=!=#2&&Q[#1,#2]&,u,u,1],{0,1}];
submultQ[cap_,fat_]:=And@@Function[i,Count[fat,i]>=Count[cap,i]]/@Union[List@@cap];
Table[Length[Select[IntegerPartitions[n],stableQ[dual[primeMS/@#],submultQ]&]],{n,0,30}]

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[#]]&]

A322846 Squarefree numbers whose prime indices have no equivalent primes.

Original entry on oeis.org

1, 2, 3, 5, 6, 7, 10, 11, 14, 15, 17, 19, 21, 22, 23, 30, 31, 33, 34, 35, 37, 38, 39, 41, 42, 46, 51, 53, 55, 57, 59, 61, 62, 65, 66, 67, 69, 70, 71, 74, 77, 78, 82, 83, 85, 87, 89, 91, 93, 95, 97, 102, 103, 105, 106, 107, 109, 110, 111, 114, 115, 118, 119

Offset: 1

Gus Wiseman, Dec 28 2018

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.
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 strict 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 sequence of all strict T_0 multiset multisystems together with their MM-numbers begins:
   1: {}
   2: {{}}
   3: {{1}}
   5: {{2}}
   6: {{},{1}}
   7: {{1,1}}
  10: {{},{2}}
  11: {{3}}
  14: {{},{1,1}}
  15: {{1},{2}}
  17: {{4}}
  19: {{1,1,1}}
  21: {{1},{1,1}}
  22: {{},{3}}
  23: {{2,2}}
  30: {{},{1},{2}}
  31: {{5}}
  33: {{1},{3}}
  34: {{},{4}}
  35: {{2},{1,1}}
  37: {{1,1,2}}
  38: {{},{1,1,1}}
  39: {{1},{1,2}}

Cf. A000009, A005117, A056239, A059201, A112798, A302242, A302505, A316978, A316979, A316983, A319558, A319564, A319728, A322847.

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],And[SquareFreeQ[#],UnsameQ@@dual[primeMS/@primeMS[#]]]&]

cp's OEIS Frontend

A319564 Number of T_0 integer partitions of n.

Views

Author

Keywords

Comments

Crossrefs

Programs

Mathematica

A326977 Number of integer partitions of n such that the dual of the multiset partition obtained by factoring each part into prime numbers is a (strict) antichain, also called T_1 integer partitions.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A326978 Number of integer partitions of n such that the dual of the multiset partition obtained by factoring each part into prime numbers is a weak antichain.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A322847 Numbers whose prime indices have no equivalent primes.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A322846 Squarefree numbers whose prime indices have no equivalent primes.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica