A141268 -id:A141268 - cp's OEIS frontend

A320330 Number of T_0 multiset partitions of integer partitions of n.

1, 1, 3, 5, 13, 25, 50, 100, 195, 366, 707, 1333, 2440

Offset: 0

Gus Wiseman, Oct 11 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}}. The T_0 condition means the dual is strict.

			The a(1) = 1 through a(5) = 25 multiset partitions:
  {{1}}  {{2}}      {{3}}          {{4}}              {{5}}
         {{1,1}}    {{1,1,1}}      {{2,2}}            {{1,1,3}}
         {{1},{1}}  {{1},{2}}      {{1,1,2}}          {{1,2,2}}
                    {{1},{1,1}}    {{1},{3}}          {{1},{4}}
                    {{1},{1},{1}}  {{2},{2}}          {{2},{3}}
                                   {{1,1,1,1}}        {{1,1,1,2}}
                                   {{1},{1,2}}        {{1},{1,3}}
                                   {{2},{1,1}}        {{1},{2,2}}
                                   {{1},{1,1,1}}      {{2},{1,2}}
                                   {{1,1},{1,1}}      {{3},{1,1}}
                                   {{1},{1},{2}}      {{1,1,1,1,1}}
                                   {{1},{1},{1,1}}    {{1},{1,1,2}}
                                   {{1},{1},{1},{1}}  {{1,1},{1,2}}
                                                      {{1},{1},{3}}
                                                      {{1},{2},{2}}
                                                      {{2},{1,1,1}}
                                                      {{1},{1,1,1,1}}
                                                      {{1,1},{1,1,1}}
                                                      {{1},{1},{1,2}}
                                                      {{1},{2},{1,1}}
                                                      {{1},{1},{1,1,1}}
                                                      {{1},{1,1},{1,1}}
                                                      {{1},{1},{1},{2}}
                                                      {{1},{1},{1},{1,1}}
                                                      {{1},{1},{1},{1},{1}}

Cf. A001970, A047968, A050342, A089259, A141268, A261049, A289501, A305551, A316983, A319066, A319312, A320328, 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]]]];
dual[eds_]:=Table[First/@Position[eds,x],{x,Union@@eds}];
Table[Length[Select[Join@@mps/@IntegerPartitions[n],UnsameQ@@dual[#]&]],{n,8}]

A330625 Number of series-reduced rooted trees whose leaves are sets (not necessarily disjoint) with multiset union a strongly normal multiset of size n.

Original entry on oeis.org

1, 1, 3, 14, 123, 1330, 19694

Offset: 0

Gus Wiseman, Dec 25 2019

A rooted tree is series-reduced if it has no unary branchings, so every non-leaf node covers at least two other nodes.

A finite multiset is strongly normal if it covers an initial interval of positive integers with weakly decreasing multiplicities.

			The a(1) = 1 through a(3) = 14 trees:
  {1}  {1,2}      {1,2,3}
       {{1},{1}}  {{1},{1,2}}
       {{1},{2}}  {{1},{2,3}}
                  {{2},{1,3}}
                  {{3},{1,2}}
                  {{1},{1},{1}}
                  {{1},{1},{2}}
                  {{1},{2},{3}}
                  {{1},{{1},{1}}}
                  {{1},{{1},{2}}}
                  {{1},{{2},{3}}}
                  {{2},{{1},{1}}}
                  {{2},{{1},{3}}}
                  {{3},{{1},{2}}}

The generalization where the leaves are multisets is A330467.
The singleton-reduced case is A330628.
The unlabeled version is A330624.
The case with all atoms distinct is A005804.
The case with all atoms equal is A196545.
The case where all leaves are singletons is A330471.
Cf. A000669, A004111, A141268, A300660, A316652, A330469, A330475, A330626, A330668, A330675.

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]]]];
strnorm[n_]:=Flatten[MapIndexed[Table[#2,{#1}]&,#]]&/@IntegerPartitions[n];
srtrees[m_]:=Prepend[Join@@Table[Tuples[srtrees/@p],{p,Select[mps[m],Length[#1]>1&]}],m];
Table[Sum[Length[Select[srtrees[s],FreeQ[#,{_,x_Integer,x_Integer,_}]&]],{s,strnorm[n]}],{n,0,5}]

A330626 Number of non-isomorphic series/singleton-reduced rooted trees whose leaves are sets (not necessarily disjoint) with a total of n atoms.

Original entry on oeis.org

1, 1, 1, 3, 17, 100, 755

Offset: 0

Gus Wiseman, Dec 26 2019

A series/singleton-reduced rooted tree on a multiset m is either the multiset m itself or a sequence of series/singleton-reduced rooted trees, one on each part of a multiset partition of m that is neither minimal (all singletons) nor maximal (only one part).

			Non-isomorphic representatives of the a(1) = 1 through a(4) = 17 trees:
  {1}  {1,2}  {1,2,3}      {1,2,3,4}
              {{1},{1,2}}  {{1},{1,2,3}}
              {{1},{2,3}}  {{1,2},{1,2}}
                           {{1,2},{1,3}}
                           {{1},{2,3,4}}
                           {{1,2},{3,4}}
                           {{1},{1},{1,2}}
                           {{1},{1},{2,3}}
                           {{1},{2},{1,2}}
                           {{1},{2},{1,3}}
                           {{1},{2},{3,4}}
                           {{1},{{1},{1,2}}}
                           {{1},{{1},{2,3}}}
                           {{1},{{2},{1,2}}}
                           {{1},{{2},{1,3}}}
                           {{1},{{2},{3,4}}}
                           {{2},{{1},{1,3}}}

The non-singleton-reduced version is A330624.
The generalization where leaves are multisets is A330470.
A labeled version is A330628 (strongly normal).
The case with all atoms distinct is A004114.
The balanced version is A330668.
Cf. A000669, A004111, A005804, A007716, A141268, A330465, A330625, A330627, A330654, A330663, A330677.

A320331 Number of strict T_0 multiset partitions of integer partitions of n.

Original entry on oeis.org

1, 1, 2, 4, 8, 17, 30, 61, 110, 207, 381, 711, 1250

Offset: 0

Gus Wiseman, Oct 11 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}}. The T_0 condition means the dual is strict.

			The a(1) = 1 through a(5) = 17 multiset partitions:
  {{1}}  {{2}}    {{3}}        {{4}}          {{5}}
         {{1,1}}  {{1,1,1}}    {{2,2}}        {{1,1,3}}
                  {{1},{2}}    {{1,1,2}}      {{1,2,2}}
                  {{1},{1,1}}  {{1},{3}}      {{1},{4}}
                               {{1,1,1,1}}    {{2},{3}}
                               {{1},{1,2}}    {{1,1,1,2}}
                               {{2},{1,1}}    {{1},{1,3}}
                               {{1},{1,1,1}}  {{1},{2,2}}
                                              {{2},{1,2}}
                                              {{3},{1,1}}
                                              {{1,1,1,1,1}}
                                              {{1},{1,1,2}}
                                              {{1,1},{1,2}}
                                              {{2},{1,1,1}}
                                              {{1},{1,1,1,1}}
                                              {{1,1},{1,1,1}}
                                              {{1},{2},{1,1}}

Cf. A001970, A047968, A050342, A089259, A141268, A261049, A289501, A305551, A319066, A319312, A320328, A320330.

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]]]];
dual[eds_]:=Table[First/@Position[eds,x],{x,Union@@eds}];
Table[Length[Select[Join@@mps/@IntegerPartitions[n],And[UnsameQ@@#,UnsameQ@@dual[#]]&]],{n,8}]

A330664 Number of non-isomorphic balanced reduced multisystems of maximum depth whose degrees (atom multiplicities) are the weakly decreasing prime indices of n.

Original entry on oeis.org

1, 1, 1, 1, 1, 2, 2, 1, 4, 5, 5, 7, 16, 16, 27, 2, 61, 33, 272, 27, 123, 61, 1385, 27, 78, 272, 95, 123, 7936, 362

Offset: 1

Gus Wiseman, Dec 28 2019

A balanced reduced multisystem is either a finite multiset, or a multiset partition with at least two parts, not all of which are singletons, of a balanced reduced multisystem.

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. A multiset whose multiplicities are the prime indices of n (such as row n of A305936) is generally not the same as the multiset of prime indices of n. For example, the prime indices of 12 are {1,1,2}, while a multiset whose multiplicities are {1,1,2} is {1,1,2,3}.

			Non-isomorphic representatives of the a(n) multisystems for n = 2, 3, 6, 9, 10, 12 (commas and outer brackets elided):
  1  11  {1}{12}  {{1}}{{1}{22}}  {{1}}{{1}{12}}  {{1}}{{1}{23}}
         {2}{11}  {{11}}{{2}{2}}  {{11}}{{1}{2}}  {{11}}{{2}{3}}
                  {{1}}{{2}{12}}  {{1}}{{2}{11}}  {{1}}{{2}{13}}
                  {{12}}{{1}{2}}  {{12}}{{1}{1}}  {{12}}{{1}{3}}
                                  {{2}}{{1}{11}}  {{2}}{{1}{13}}
                                                  {{2}}{{3}{11}}
                                                  {{23}}{{1}{1}}

The non-maximal version is A330666.
The case of constant or strict atoms is A000111.
Labeled versions are A330728, A330665 (prime indices), and A330675 (strongly normal).
Non-isomorphic multiset partitions whose degrees are the prime indices of n are A318285.
Cf. A004114, A005121, A007716, A048816, A141268, A306186, A318846, A318848, A330470, A330474, A330663.

For n > 1, a(2^n) = a(prime(n)) = A000111(n - 1).

A320174 Number of series-reduced rooted trees whose leaves are constant integer partitions whose multiset union is an integer partition of n.

Original entry on oeis.org

1, 3, 6, 19, 55, 200, 713, 2740, 10651, 42637, 173012, 713280, 2972389, 12514188, 53119400, 227140464, 977382586, 4229274235, 18391269922, 80330516578, 352269725526, 1550357247476, 6845517553493, 30316222112019, 134626183784975, 599341552234773, 2674393679352974

Offset: 1

Gus Wiseman, Oct 07 2018

nonn

A rooted tree is series-reduced if every non-leaf node has at least two branches.

			The a(1) = 1 through a(4) = 19 trees:
  (1)  (2)       (3)            (4)
       (11)      (111)          (22)
       ((1)(1))  ((1)(2))       (1111)
                 ((1)(11))      ((1)(3))
                 ((1)(1)(1))    ((2)(2))
                 ((1)((1)(1)))  ((2)(11))
                                ((1)(111))
                                ((11)(11))
                                ((1)(1)(2))
                                ((1)(1)(11))
                                ((1)((1)(2)))
                                ((2)((1)(1)))
                                ((1)((1)(11)))
                                ((1)(1)(1)(1))
                                ((11)((1)(1)))
                                ((1)((1)(1)(1)))
                                ((1)(1)((1)(1)))
                                (((1)(1))((1)(1)))
                                ((1)((1)((1)(1))))

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

Cf. A000081, A000311, A000669, A001678, A005804, A141268, A292504, A300660, A317099, A319312, A320173, A320175.

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]]]];
dot[m_]:=If[SameQ@@m,Prepend[#,m],#]&[Join@@Table[Union[Sort/@Tuples[dot/@p]],{p,Select[mps[m],Length[#]>1&]}]];
Table[Length[Join@@Table[dot[m],{m,IntegerPartitions[n]}]],{n,10}]

EulerT(v)={Vec(exp(x*Ser(dirmul(v,vector(#v,n,1/n))))-1, -#v)}
seq(n)={my(v=vector(n)); for(n=1, n, v[n]=numdiv(n) + EulerT(v[1..n])[n]); v} \\ Andrew Howroyd, Oct 25 2018

Terms a(11) and beyond from Andrew Howroyd, Oct 25 2018

A320175 Number of series-reduced rooted trees whose leaves are strict integer partitions whose multiset union is an integer partition of n.

Original entry on oeis.org

1, 2, 5, 13, 37, 120, 395, 1381, 4931, 18074, 67287, 254387, 972559, 3756315, 14629237, 57395490, 226613217, 899773355, 3590349661, 14390323014, 57907783039, 233867667197, 947601928915, 3851054528838, 15693587686823, 64114744713845, 262543966114921, 1077406218930902

Offset: 1

Gus Wiseman, Oct 07 2018

nonn

A rooted tree is series-reduced if every non-leaf node has at least two branches.

			The a(1) = 1 through a(4) = 13 trees:
  (1)  (2)       (3)            (4)
       ((1)(1))  (21)           (31)
                 ((1)(2))       ((1)(3))
                 ((1)(1)(1))    ((2)(2))
                 ((1)((1)(1)))  ((1)(21))
                                ((1)(1)(2))
                                ((1)((1)(2)))
                                ((2)((1)(1)))
                                ((1)(1)(1)(1))
                                ((1)((1)(1)(1)))
                                ((1)(1)((1)(1)))
                                (((1)(1))((1)(1)))
                                ((1)((1)((1)(1))))

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

Cf. A000081, A000311, A000669, A001678, A005804, A141268, A292504, A300660, A317099, A319312, A320173, A320174.

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]]]];
sot[m_]:=If[UnsameQ@@m,Prepend[#,m],#]&[Join@@Table[Union[Sort/@Tuples[sot/@p]],{p,Select[mps[m],Length[#]>1&]}]];
Table[Length[Join@@Table[sot[m],{m,IntegerPartitions[n]}]],{n,10}]

EulerT(v)={Vec(exp(x*Ser(dirmul(v,vector(#v,n,1/n))))-1, -#v)}
seq(n)={my(p=prod(k=1, n, 1 + x^k + O(x*x^n)), v=vector(n)); for(n=1, n, v[n]=polcoef(p, n) + EulerT(v[1..n])[n]); v} \\ Andrew Howroyd, Oct 25 2018

Terms a(11) and beyond from Andrew Howroyd, Oct 25 2018

A330668 Number of non-isomorphic balanced reduced multisystems of weight n whose leaves (which are multisets of atoms) are all sets.

Original entry on oeis.org

1, 1, 1, 3, 22, 204, 2953

Offset: 0

Gus Wiseman, Dec 27 2019

A balanced reduced multisystem is either a finite multiset, or a multiset partition with at least two parts, not all of which are singletons, of a balanced reduced multisystem. The weight of an atom is 1, while the weight of a multiset is the sum of weights of its elements.

			Non-isomorphic representatives of the a(1) = 1 through a(4) = 22 multisystems:
  {1}  {1,2}  {1,2,3}      {1,2,3,4}
              {{1},{1,2}}  {{1},{1,2,3}}
              {{1},{2,3}}  {{1,2},{1,2}}
                           {{1,2},{1,3}}
                           {{1},{2,3,4}}
                           {{1,2},{3,4}}
                           {{1},{1},{1,2}}
                           {{1},{1},{2,3}}
                           {{1},{2},{1,2}}
                           {{1},{2},{1,3}}
                           {{1},{2},{3,4}}
                           {{{1}},{{1},{1,2}}}
                           {{{1}},{{1},{2,3}}}
                           {{{1,2}},{{1},{1}}}
                           {{{1}},{{2},{1,2}}}
                           {{{1,2}},{{1},{2}}}
                           {{{1}},{{2},{1,3}}}
                           {{{1,2}},{{1},{3}}}
                           {{{1}},{{2},{3,4}}}
                           {{{1,2}},{{3},{4}}}
                           {{{2}},{{1},{1,3}}}
                           {{{2,3}},{{1},{1}}}

The case with all atoms different is A318813.
The version where the leaves are multisets is A330474.
The tree version is A330626.
The maximum-depth case is A330677.
Unlabeled series-reduced rooted trees whose leaves are sets are A330624.
Cf. A000311, A004114, A005121, A005804, A007716, A048816, A141268, A283877, A306186, A318812, A320154, A330470, A330628, A330663.

A330677 Number of non-isomorphic balanced reduced multisystems of weight n and maximum depth whose leaves (which are multisets of atoms) are sets.

Original entry on oeis.org

1, 1, 1, 2, 11, 81, 859

Offset: 0

Gus Wiseman, Dec 30 2019

A balanced reduced multisystem is either a finite multiset, or a multiset partition with at least two parts, not all of which are singletons, of a balanced reduced multisystem. The weight of an atom is 1, while the weight of a multiset is the sum of weights of its elements.

			Non-isomorphic representatives of the a(0) = 1 through a(4) = 11 multisystems:
  {}  {1}  {1,2}  {{1},{1,2}}  {{{1}},{{1},{1,2}}}
                  {{1},{2,3}}  {{{1}},{{1},{2,3}}}
                               {{{1,2}},{{1},{1}}}
                               {{{1}},{{2},{1,2}}}
                               {{{1,2}},{{1},{2}}}
                               {{{1}},{{2},{1,3}}}
                               {{{1,2}},{{1},{3}}}
                               {{{1}},{{2},{3,4}}}
                               {{{1,2}},{{3},{4}}}
                               {{{2}},{{1},{1,3}}}
                               {{{2,3}},{{1},{1}}}

The version with all distinct atoms is A000111.
Non-isomorphic set multipartitions are A049311.
The (non-maximal) tree version is A330626.
Allowing leaves to be multisets gives A330663.
The case with prescribed degrees is A330664.
The version allowing all depths is A330668.
Cf. A000669, A001678, A004114, A005121, A007716, A141268, A283877, A306186, A330465, A330470, A330624.

A320171 Number of series-reduced rooted identity trees whose leaves are integer partitions whose multiset union is an integer partition of n.

Original entry on oeis.org

1, 2, 5, 11, 29, 82, 247, 782, 2579, 8702, 29975, 104818, 371111, 1327307, 4788687, 17404838, 63669763, 234237605, 866090021, 3216738344, 11995470691, 44894977263, 168582174353, 634939697164, 2398004674911, 9079614633247, 34458722286825, 131059771522401

Offset: 1

Gus Wiseman, Oct 07 2018

nonn

A rooted tree is series-reduced if every non-leaf node has at least two branches.

In an identity tree, all branches directly under any given node are different.

			The a(1) = 1 through a(4) = 11 rooted identity trees:
  (1)  (2)   (3)        (4)
       (11)  (21)       (22)
             (111)      (31)
             ((1)(2))   (211)
             ((1)(11))  (1111)
                        ((1)(3))
                        ((1)(21))
                        ((2)(11))
                        ((1)(111))
                        ((1)((1)(2)))
                        ((1)((1)(11)))

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

Cf. A000081, A000311, A000669, A001678, A005804, A141268, A292504, A300660, A319312, A320172, A320177, A320178.

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]]]];
gig[m_]:=Prepend[Join@@Table[Union[Sort/@Select[Sort/@Tuples[gig/@mtn],UnsameQ@@#&]],{mtn,Select[mps[m],Length[#]>1&]}],m];
Table[Sum[Length[gig[y]],{y,IntegerPartitions[n]}],{n,8}]

WeighT(v)={Vec(exp(x*Ser(dirmul(v, vector(#v,n,(-1)^(n-1)/n))))-1,-#v)}
seq(n)={my(v=vector(n)); for(n=1, n, v[n]=numbpart(n) + WeighT(v[1..n])[n]); v} \\ Andrew Howroyd, Oct 25 2018

Terms a(12) and beyond from Andrew Howroyd, Oct 25 2018

cp's OEIS Frontend

A320330 Number of T_0 multiset partitions of integer partitions of n.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A330625 Number of series-reduced rooted trees whose leaves are sets (not necessarily disjoint) with multiset union a strongly normal multiset of size n.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A330626 Number of non-isomorphic series/singleton-reduced rooted trees whose leaves are sets (not necessarily disjoint) with a total of n atoms.

Views

Author

Keywords

Comments

Examples

Crossrefs

A320331 Number of strict T_0 multiset partitions of integer partitions of n.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A330664 Number of non-isomorphic balanced reduced multisystems of maximum depth whose degrees (atom multiplicities) are the weakly decreasing prime indices of n.

Views

Author

Keywords

Comments

Examples

Crossrefs

Formula

A320174 Number of series-reduced rooted trees whose leaves are constant integer partitions whose multiset union is an integer partition of n.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

Extensions

A320175 Number of series-reduced rooted trees whose leaves are strict integer partitions whose multiset union is an integer partition of n.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

Extensions

A330668 Number of non-isomorphic balanced reduced multisystems of weight n whose leaves (which are multisets of atoms) are all sets.

Views

Author

Keywords

Comments

Examples

Crossrefs

A330677 Number of non-isomorphic balanced reduced multisystems of weight n and maximum depth whose leaves (which are multisets of atoms) are sets.

Views

Author

Keywords

Comments

Examples