cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Previous Showing 41-50 of 206 results. Next

A325034 Sum of products of the multisets of prime indices of each prime index of n.

Original entry on oeis.org

0, 1, 1, 2, 2, 2, 1, 3, 2, 3, 3, 3, 2, 2, 3, 4, 4, 3, 1, 4, 2, 4, 4, 4, 4, 3, 3, 3, 3, 4, 5, 5, 4, 5, 3, 4, 2, 2, 3, 5, 6, 3, 4, 5, 4, 5, 6, 5, 2, 5, 5, 4, 1, 4, 5, 4, 2, 4, 7, 5, 4, 6, 3, 6, 4, 5, 8, 6, 5, 4, 3, 5, 8, 3, 5, 3, 4, 4, 5, 6, 4, 7, 9, 4, 6, 5, 4
Offset: 1

Views

Author

Gus Wiseman, Mar 25 2019

Keywords

Comments

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.

Examples

			94 has prime indices {1,15} with prime indices {{},{2,3}} with products {1,6} with sum a(94) = 7.
		

Crossrefs

Programs

  • Mathematica
    primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    Table[Plus@@Times@@@primeMS/@primeMS[n],{n,100}]

Formula

Totally additive with a(prime(n)) = A003963(n).

A329559 MM-numbers of multiset clutters (connected weak antichains of multisets).

Original entry on oeis.org

1, 2, 3, 5, 7, 9, 11, 13, 17, 19, 23, 25, 27, 29, 31, 37, 41, 43, 47, 49, 53, 59, 61, 67, 71, 73, 79, 81, 83, 89, 91, 97, 101, 103, 107, 109, 113, 121, 125, 127, 131, 137, 139, 149, 151, 157, 163, 167, 169, 173, 179, 181, 191, 193, 197, 199, 203, 211, 223, 227
Offset: 1

Views

Author

Gus Wiseman, Nov 18 2019

Keywords

Comments

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

Examples

			The sequence of terms tother with their corresponding clutters begins:
   1: {}              37: {{1,1,2}}            91: {{1,1},{1,2}}
   2: {{}}            41: {{6}}                97: {{3,3}}
   3: {{1}}           43: {{1,4}}             101: {{1,6}}
   5: {{2}}           47: {{2,3}}             103: {{2,2,2}}
   7: {{1,1}}         49: {{1,1},{1,1}}       107: {{1,1,4}}
   9: {{1},{1}}       53: {{1,1,1,1}}         109: {{10}}
  11: {{3}}           59: {{7}}               113: {{1,2,3}}
  13: {{1,2}}         61: {{1,2,2}}           121: {{3},{3}}
  17: {{4}}           67: {{8}}               125: {{2},{2},{2}}
  19: {{1,1,1}}       71: {{1,1,3}}           127: {{11}}
  23: {{2,2}}         73: {{2,4}}             131: {{1,1,1,1,1}}
  25: {{2},{2}}       79: {{1,5}}             137: {{2,5}}
  27: {{1},{1},{1}}   81: {{1},{1},{1},{1}}   139: {{1,7}}
  29: {{1,3}}         83: {{9}}               149: {{3,4}}
  31: {{5}}           89: {{1,1,1,2}}         151: {{1,1,2,2}}
		

Crossrefs

Connected numbers are A305078.
Stable numbers are A316476.
Clutters (of sets) are A048143.

Programs

  • Mathematica
    primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    zsm[s_]:=With[{c=Select[Tuples[Range[Length[s]],2],And[Less@@#,GCD@@s[[#]]]>1&]},If[c=={},s,zsm[Sort[Append[Delete[s,List/@c[[1]]],LCM@@s[[c[[1]]]]]]]]];
    stableQ[u_,Q_]:=!Apply[Or,Outer[#1=!=#2&&Q[#1,#2]&,u,u,1],{0,1}];
    Select[Range[100],And[stableQ[primeMS[#],Divisible],Length[zsm[primeMS[#]]]<=1]&]

Formula

Equals {1} followed by the intersection of A305078 and A316476.

A305149 Number of factorizations of n whose distinct factors are pairwise indivisible and greater than 1.

Original entry on oeis.org

1, 1, 1, 2, 1, 2, 1, 2, 2, 2, 1, 3, 1, 2, 2, 3, 1, 3, 1, 3, 2, 2, 1, 4, 2, 2, 2, 3, 1, 5, 1, 2, 2, 2, 2, 6, 1, 2, 2, 4, 1, 5, 1, 3, 3, 2, 1, 5, 2, 3, 2, 3, 1, 4, 2, 4, 2, 2, 1, 8, 1, 2, 3, 4, 2, 5, 1, 3, 2, 5, 1, 6, 1, 2, 3, 3, 2, 5, 1, 5, 3, 2, 1, 8, 2, 2, 2, 4, 1, 8, 2, 3, 2, 2, 2, 6, 1, 3, 3, 6, 1, 5, 1, 4, 5
Offset: 1

Views

Author

Gus Wiseman, May 26 2018

Keywords

Examples

			The a(60) = 8 factorizations are (2*2*3*5), (2*2*15), (3*4*5), (3*20), (4*15), (5*12), (6*10), (60). Missing from this list are (2*3*10), (2*5*6), (2*30).
		

Crossrefs

Programs

  • Mathematica
    facs[n_]:=If[n<=1,{{}},Join@@Table[Map[Prepend[#,d]&,Select[facs[n/d],Min@@#>=d&]],{d,Rest[Divisors[n]]}]];
    Table[Length[Select[facs[n],Select[Tuples[Union[#],2],UnsameQ@@#&&Divisible@@#&]=={}&]],{n,100}]
  • PARI
    pairwise_indivisible(v) = { for(i=1,#v,for(j=i+1,#v,if(!(v[j]%v[i]),return(0)))); (1); };
    A305149(n, m=n, facs=List([])) = if(1==n, pairwise_indivisible(Set(facs)), my(s=0, newfacs); fordiv(n, d, if((d>1)&&(d<=m), newfacs = List(facs); listput(newfacs,d); s += A305149(n/d, d, newfacs))); (s)); \\ Antti Karttunen, Oct 08 2018

Extensions

More terms from Antti Karttunen, Oct 08 2018

A322389 Vertex-connectivity of the integer partition with Heinz number n.

Original entry on oeis.org

0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 2, 0, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 1, 0, 2, 0, 1, 0, 0, 0, 0, 0, 2, 0, 2, 0, 1, 0, 2, 0, 0, 0, 2, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1, 0, 1, 0, 2, 0, 1, 0, 2, 0, 1, 0, 0, 0, 2, 0, 2, 0, 0, 0, 0, 0, 2, 0, 1, 0, 1, 0, 0, 0, 2
Offset: 1

Views

Author

Gus Wiseman, Dec 05 2018

Keywords

Comments

The Heinz number of an integer partition (y_1, ..., y_k) is prime(y_1) * ... * prime(y_k).
The vertex-connectivity of an integer partition is the minimum number of primes that must be divided out (and any parts then equal to 1 removed) so that the prime factorizations of the remaining parts form a disconnected (or empty) hypergraph.

Examples

			The integer partition (6,4,3) with Heinz number 455 does not become disconnected or empty if 2 is divided out giving (3,3), or if 3 is divided out giving (4,2), but it does become disconnected or empty if both 2 and 3 are divided out giving (); so a(455) = 2.
195 is the Heinz number of (6,3,2), corresponding to the multiset partition {{1},{2},{1,2}}. Removing the vertex 1 gives {{2},{2}}, while removing 2 gives {{1},{1}}. These are both connected, so both vertices must be removed to obtain a disconnected or empty multiset partition; hence a(195) = 2.
		

Crossrefs

Programs

  • Mathematica
    primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    csm[s_]:=With[{c=Select[Tuples[Range[Length[s]],2],And[OrderedQ[#],UnsameQ@@#,Length[Intersection@@s[[#]]]>0]&]},If[c=={},s,csm[Sort[Append[Delete[s,List/@c[[1]]],Union@@s[[c[[1]]]]]]]]];
    vertConn[y_]:=If[Length[csm[primeMS/@y]]!=1,0,Min@@Length/@Select[Subsets[Union@@primeMS/@y],Function[del,Length[csm[DeleteCases[DeleteCases[primeMS/@y,Alternatives@@del,{2}],{}]]]!=1]]];
    Array[vertConn@*primeMS,100]

A330060 MM-numbers of VDD-normalized multisets of multisets.

Original entry on oeis.org

1, 2, 3, 4, 6, 7, 8, 9, 12, 13, 14, 15, 16, 18, 19, 21, 24, 26, 27, 28, 30, 32, 35, 36, 37, 38, 39, 42, 45, 48, 49, 52, 53, 54, 56, 57, 60, 63, 64, 70, 72, 74, 76, 78, 81, 84, 89, 90, 91, 95, 96, 98, 104, 105, 106, 108, 111, 112, 113, 114, 117, 120, 126, 128
Offset: 1

Views

Author

Gus Wiseman, Dec 03 2019

Keywords

Comments

First differs from A330104 and A330120 in having 35 and lacking 69, with corresponding multisets of multisets 35: {{2},{1,1}} and 69: {{1},{2,2}}.
First differs from A330108 in having 207 and lacking 175, with corresponding multisets of multisets 207: {{1},{1},{2,2}} and 175: {{2},{2},{1,1}}.
We define the VDD (vertex-degrees decreasing) normalization of a multiset of multisets to be obtained by first normalizing so that the vertices cover an initial interval of positive integers, then applying all permutations to the vertex set, then selecting only the representatives whose vertex-degrees are weakly decreasing, and finally taking the least of these representatives, where the ordering is first by length and then lexicographically.
For example, 15301 is the MM-number of {{3},{1,2},{1,1,4}}, which has the following normalizations together with their MM-numbers:
Brute-force: 43287: {{1},{2,3},{2,2,4}}
Lexicographic: 43143: {{1},{2,4},{2,2,3}}
VDD: 15515: {{2},{1,3},{1,1,4}}
MM: 15265: {{2},{1,4},{1,1,3}}
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}}.

Examples

			The sequence of all VDD-normalized multisets of multisets together with their MM-numbers begins:
   1: 0           21: {1}{11}        49: {11}{11}         84: {}{}{1}{11}
   2: {}          24: {}{}{}{1}      52: {}{}{12}         89: {1112}
   3: {1}         26: {}{12}         53: {1111}           90: {}{1}{1}{2}
   4: {}{}        27: {1}{1}{1}      54: {}{1}{1}{1}      91: {11}{12}
   6: {}{1}       28: {}{}{11}       56: {}{}{}{11}       95: {2}{111}
   7: {11}        30: {}{1}{2}       57: {1}{111}         96: {}{}{}{}{}{1}
   8: {}{}{}      32: {}{}{}{}{}     60: {}{}{1}{2}       98: {}{11}{11}
   9: {1}{1}      35: {2}{11}        63: {1}{1}{11}      104: {}{}{}{12}
  12: {}{}{1}     36: {}{}{1}{1}     64: {}{}{}{}{}{}    105: {1}{2}{11}
  13: {12}        37: {112}          70: {}{2}{11}       106: {}{1111}
  14: {}{11}      38: {}{111}        72: {}{}{}{1}{1}    108: {}{}{1}{1}{1}
  15: {1}{2}      39: {1}{12}        74: {}{112}         111: {1}{112}
  16: {}{}{}{}    42: {}{1}{11}      76: {}{}{111}       112: {}{}{}{}{11}
  18: {}{1}{1}    45: {1}{1}{2}      78: {}{1}{12}       113: {123}
  19: {111}       48: {}{}{}{}{1}    81: {1}{1}{1}{1}    114: {}{1}{111}
		

Crossrefs

Equals the image/fixed points of the idempotent sequence A330061.
A subset of A320456.
Non-isomorphic multiset partitions are A007716.
MM-weight is A302242.
Other fixed points:
- Brute-force: A330104 (multisets of multisets), A330107 (multiset partitions), A330099 (set-systems).
- Lexicographic: A330120 (multisets of multisets), A330121 (multiset partitions), A330110 (set-systems).
- VDD: A330060 (multisets of multisets), A330097 (multiset partitions), A330100 (set-systems).
- MM: A330108 (multisets of multisets), A330122 (multiset partitions), A330123 (set-systems).
- BII: A330109 (set-systems).

Programs

  • Mathematica
    primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    sysnorm[m_]:=If[Union@@m!={}&&Union@@m!=Range[Max@@Flatten[m]],sysnorm[m/.Rule@@@Table[{(Union@@m)[[i]],i},{i,Length[Union@@m]}]],First[Sort[sysnorm[m,1]]]];
    sysnorm[m_,aft_]:=If[Length[Union@@m]<=aft,{m},With[{mx=Table[Count[m,i,{2}],{i,Select[Union@@m,#>=aft&]}]},Union@@(sysnorm[#,aft+1]&/@Union[Table[Map[Sort,m/.{par+aft-1->aft,aft->par+aft-1},{0,1}],{par,First/@Position[mx,Max[mx]]}]])]];
    Select[Range[100],Sort[primeMS/@primeMS[#]]==sysnorm[primeMS/@primeMS[#]]&]

A330097 MM-numbers of VDD-normalized multiset partitions.

Original entry on oeis.org

1, 3, 7, 9, 13, 15, 19, 21, 27, 35, 37, 39, 45, 49, 53, 57, 63, 81, 89, 91, 95, 105, 111, 113, 117, 131, 133, 135, 141, 147, 151, 159, 161, 165, 169, 171, 183, 189, 195, 207, 223, 225, 243, 245, 247, 259, 265, 267, 273, 281, 285, 311, 315, 329, 333, 339, 343
Offset: 1

Views

Author

Gus Wiseman, Dec 04 2019

Keywords

Comments

First differs from A330122 in having 207 and lacking 175, with corresponding multiset partitions 207: {{1},{1},{2,2}} and 175: {{2},{2},{1,1}}.
A multiset partition is a finite multiset of finite nonempty multisets of positive integers.
We define the VDD (vertex-degrees decreasing) normalization of a multiset of multisets to be obtained by first normalizing so that the vertices cover an initial interval of positive integers, then applying all permutations to the vertex set, then selecting only the representatives whose vertex-degrees are weakly decreasing, and finally taking the least of these representatives, where the ordering of multisets is first by length and then lexicographically.
For example, 15301 is the MM-number of {{3},{1,2},{1,1,4}}, which has the following normalizations together with their MM-numbers:
Brute-force: 43287: {{1},{2,3},{2,2,4}}
Lexicographic: 43143: {{1},{2,4},{2,2,3}}
VDD: 15515: {{2},{1,3},{1,1,4}}
MM: 15265: {{2},{1,4},{1,1,3}}
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}}.

Examples

			The sequence of all VDD-normalized multiset partitions together with their MM-numbers begins:
   1: 0             57: {1}{111}        151: {1122}
   3: {1}           63: {1}{1}{11}      159: {1}{1111}
   7: {11}          81: {1}{1}{1}{1}    161: {11}{22}
   9: {1}{1}        89: {1112}          165: {1}{2}{3}
  13: {12}          91: {11}{12}        169: {12}{12}
  15: {1}{2}        95: {2}{111}        171: {1}{1}{111}
  19: {111}        105: {1}{2}{11}      183: {1}{122}
  21: {1}{11}      111: {1}{112}        189: {1}{1}{1}{11}
  27: {1}{1}{1}    113: {123}           195: {1}{2}{12}
  35: {2}{11}      117: {1}{1}{12}      207: {1}{1}{22}
  37: {112}        131: {11111}         223: {11112}
  39: {1}{12}      133: {11}{111}       225: {1}{1}{2}{2}
  45: {1}{1}{2}    135: {1}{1}{1}{2}    243: {1}{1}{1}{1}{1}
  49: {11}{11}     141: {1}{23}         245: {2}{11}{11}
  53: {1111}       147: {1}{11}{11}     247: {12}{111}
For example, 1155 is the MM-number of {{1},{2},{3},{1,1}}, which is VDD-normalized, so 1155 belongs to the sequence.
On the other hand, 69  is the MM-number of {{1},{2,2}}, but the VDD-normalization is {{2},{1,1}}, so 69 does not belong to the sequence.
		

Crossrefs

Equals the odd terms of A330060.
A subset of A320634.
Non-isomorphic multiset partitions are A007716.
MM-weight is A302242.
Other fixed points:
- Brute-force: A330104 (multisets of multisets), A330107 (multiset partitions), A330099 (set-systems).
- Lexicographic: A330120 (multisets of multisets), A330121 (multiset partitions), A330110 (set-systems).
- VDD: A330060 (multisets of multisets), A330097 (multiset partitions), A330100 (set-systems).
- MM: A330108 (multisets of multisets), A330122 (multiset partitions), A330123 (set-systems).
- BII: A330109 (set-systems).

Programs

  • Mathematica
    primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    sysnorm[m_]:=If[Union@@m!={}&&Union@@m!=Range[Max@@Flatten[m]],sysnorm[m/.Rule@@@Table[{(Union@@m)[[i]],i},{i,Length[Union@@m]}]],First[Sort[sysnorm[m,1]]]];
    sysnorm[m_,aft_]:=If[Length[Union@@m]<=aft,{m},With[{mx=Table[Count[m,i,{2}],{i,Select[Union@@m,#>=aft&]}]},Union@@(sysnorm[#,aft+1]&/@Union[Table[Map[Sort,m/.{par+aft-1->aft,aft->par+aft-1},{0,1}],{par,First/@Position[mx,Max[mx]]}]])]];
    Select[Range[1,100,2],Sort[primeMS/@primeMS[#]]==sysnorm[primeMS/@primeMS[#]]&]

A330108 MM-numbers of MM-normalized multisets of multisets.

Original entry on oeis.org

1, 2, 3, 4, 6, 7, 8, 9, 12, 13, 14, 15, 16, 18, 19, 21, 24, 26, 27, 28, 30, 32, 35, 36, 37, 38, 39, 42, 45, 48, 49, 52, 53, 54, 56, 57, 60, 63, 64, 70, 72, 74, 76, 78, 81, 84, 89, 90, 91, 95, 96, 98, 104, 105, 106, 108, 111, 112, 113, 114, 117, 120, 126, 128
Offset: 1

Views

Author

Gus Wiseman, Dec 05 2019

Keywords

Comments

First differs from A330060 in having 175 and lacking 207, with corresponding multisets of multisets 175: {{2},{2},{1,1}} and 207: {{1},{1},{2,2}}.
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}}.
We define the MM-normalization of a multiset of multisets to be obtained by first normalizing so that the vertices cover an initial interval of positive integers, then applying all permutations to the vertex set, and finally taking the representative with the smallest MM-number.
For example, 15301 is the MM-number of {{3},{1,2},{1,1,4}}, which has the following normalizations together with their MM-numbers:
Brute-force: 43287: {{1},{2,3},{2,2,4}}
Lexicographic: 43143: {{1},{2,4},{2,2,3}}
VDD: 15515: {{2},{1,3},{1,1,4}}
MM: 15265: {{2},{1,4},{1,1,3}}

Examples

			The sequence of all MM-normalized multisets of multisets together with their MM-numbers begins:
   1: 0           21: {1}{11}        49: {11}{11}         84: {}{}{1}{11}
   2: {}          24: {}{}{}{1}      52: {}{}{12}         89: {1112}
   3: {1}         26: {}{12}         53: {1111}           90: {}{1}{1}{2}
   4: {}{}        27: {1}{1}{1}      54: {}{1}{1}{1}      91: {11}{12}
   6: {}{1}       28: {}{}{11}       56: {}{}{}{11}       95: {2}{111}
   7: {11}        30: {}{1}{2}       57: {1}{111}         96: {}{}{}{}{}{1}
   8: {}{}{}      32: {}{}{}{}{}     60: {}{}{1}{2}       98: {}{11}{11}
   9: {1}{1}      35: {2}{11}        63: {1}{1}{11}      104: {}{}{}{12}
  12: {}{}{1}     36: {}{}{1}{1}     64: {}{}{}{}{}{}    105: {1}{2}{11}
  13: {12}        37: {112}          70: {}{2}{11}       106: {}{1111}
  14: {}{11}      38: {}{111}        72: {}{}{}{1}{1}    108: {}{}{1}{1}{1}
  15: {1}{2}      39: {1}{12}        74: {}{112}         111: {1}{112}
  16: {}{}{}{}    42: {}{1}{11}      76: {}{}{111}       112: {}{}{}{}{11}
  18: {}{1}{1}    45: {1}{1}{2}      78: {}{1}{12}       113: {123}
  19: {111}       48: {}{}{}{}{1}    81: {1}{1}{1}{1}    114: {}{1}{111}
		

Crossrefs

Equals the image/fixed points of the idempotent sequence A330194.
A subset of A320456.
Non-isomorphic multiset partitions are A007716.
MM-weight is A302242.
Other fixed points:
- Brute-force: A330104 (multisets of multisets), A330107 (multiset partitions), A330099 (set-systems).
- Lexicographic: A330120 (multisets of multisets), A330121 (multiset partitions), A330110 (set-systems).
- VDD: A330060 (multisets of multisets), A330097 (multiset partitions), A330100 (set-systems).
- MM: A330108 (multisets of multisets), A330122 (multiset partitions), A330123 (set-systems).
- BII: A330109 (set-systems).

Programs

  • Mathematica
    primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    mmnorm[m_]:=If[Union@@m!={}&&Union@@m!=Range[Max@@Flatten[m]],mmnorm[m/.Rule@@@Table[{(Union@@m)[[i]],i},{i,Length[Union@@m]}]],First[SortBy[brute[m,1],Map[Times@@Prime/@#&,#,{0,1}]&]]];
    brute[m_,1]:=Table[Sort[Sort/@(m/.Rule@@@Table[{i,p[[i]]},{i,Length[p]}])],{p,Permutations[Union@@m]}];
    Select[Range[100],Sort[primeMS/@primeMS[#]]==mmnorm[primeMS/@primeMS[#]]&]

A330120 MM-numbers of lexicographically normalized multisets of multisets.

Original entry on oeis.org

1, 2, 3, 4, 6, 7, 8, 9, 12, 13, 14, 15, 16, 18, 19, 21, 24, 26, 27, 28, 30, 32, 36, 37, 38, 39, 42, 45, 48, 49, 52, 53, 54, 56, 57, 60, 63, 64, 69, 72, 74, 76, 78, 81, 84, 89, 90, 91, 96, 98, 104, 105, 106, 108, 111, 112, 113, 114, 117, 120, 126, 128, 131, 133
Offset: 1

Views

Author

Gus Wiseman, Dec 05 2019

Keywords

Comments

First differs from A330104 in lacking 435 and having 429, with corresponding multisets of multisets 435: {{1},{2},{1,3}} and 429: {{1},{3},{1,2}}.
We define the lexicographic normalization of a multiset of multisets to be obtained by first normalizing so that the vertices cover an initial interval of positive integers, then applying all permutations to the vertex set, and finally taking the lexicographically least of these representatives.
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}}.
For example, 15301 is the MM-number of {{3},{1,2},{1,1,4}}, which has the following normalizations together with their MM-numbers:
Brute-force: 43287: {{1},{2,3},{2,2,4}}
Lexicographic: 43143: {{1},{2,4},{2,2,3}}
VDD: 15515: {{2},{1,3},{1,1,4}}
MM: 15265: {{2},{1,4},{1,1,3}}

Examples

			The sequence of all lexicographically normalized multisets of multisets together with their MM-numbers begins:
   1: 0          21: {1}{11}       52: {}{}{12}        89: {1112}
   2: {}         24: {}{}{}{1}     53: {1111}          90: {}{1}{1}{2}
   3: {1}        26: {}{12}        54: {}{1}{1}{1}     91: {11}{12}
   4: {}{}       27: {1}{1}{1}     56: {}{}{}{11}      96: {}{}{}{}{}{1}
   6: {}{1}      28: {}{}{11}      57: {1}{111}        98: {}{11}{11}
   7: {11}       30: {}{1}{2}      60: {}{}{1}{2}     104: {}{}{}{12}
   8: {}{}{}     32: {}{}{}{}{}    63: {1}{1}{11}     105: {1}{2}{11}
   9: {1}{1}     36: {}{}{1}{1}    64: {}{}{}{}{}{}   106: {}{1111}
  12: {}{}{1}    37: {112}         69: {1}{22}        108: {}{}{1}{1}{1}
  13: {12}       38: {}{111}       72: {}{}{}{1}{1}   111: {1}{112}
  14: {}{11}     39: {1}{12}       74: {}{112}        112: {}{}{}{}{11}
  15: {1}{2}     42: {}{1}{11}     76: {}{}{111}      113: {123}
  16: {}{}{}{}   45: {1}{1}{2}     78: {}{1}{12}      114: {}{1}{111}
  18: {}{1}{1}   48: {}{}{}{}{1}   81: {1}{1}{1}{1}   117: {1}{1}{12}
  19: {111}      49: {11}{11}      84: {}{}{1}{11}    120: {}{}{}{1}{2}
		

Crossrefs

A subset of A320456.
MM-weight is A302242.
Non-isomorphic multiset partitions are A007716.
Other fixed points:
- Brute-force: A330104 (multisets of multisets), A330107 (multiset partitions), A330099 (set-systems).
- Lexicographic: A330120 (multisets of multisets), A330121 (multiset partitions), A330110 (set-systems).
- VDD: A330060 (multisets of multisets), A330097 (multiset partitions), A330100 (set-systems).
- MM: A330108 (multisets of multisets), A330122 (multiset partitions), A330123 (set-systems).
- BII: A330109 (set-systems).

A330121 MM-numbers of lexicographically normalized multiset partitions.

Original entry on oeis.org

1, 3, 7, 9, 13, 15, 19, 21, 27, 37, 39, 45, 49, 53, 57, 63, 69, 81, 89, 91, 105, 111, 113, 117, 131, 133, 135, 141, 147, 151, 159, 161, 165, 169, 171, 183, 189, 195, 207, 223, 225, 243, 247, 259, 267, 273, 281, 285, 309, 311, 315, 329, 333, 339, 343, 351, 359
Offset: 1

Views

Author

Gus Wiseman, Dec 05 2019

Keywords

Comments

First differs from A330107 in lacking 435 and having 429, with corresponding multisets of multisets 435: {{1},{2},{1,3}} and 429: {{1},{3},{1,2}}.
We define the lexicographic normalization of a multiset of multisets to be obtained by first normalizing so that the vertices cover an initial interval of positive integers, then applying all permutations to the vertex set, and finally taking the lexicographically least of these representatives.
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}}.
For example, 15301 is the MM-number of {{3},{1,2},{1,1,4}}, which has the following normalizations together with their MM-numbers:
Brute-force: 43287: {{1},{2,3},{2,2,4}}
Lexicographic: 43143: {{1},{2,4},{2,2,3}}
VDD: 15515: {{2},{1,3},{1,1,4}}
MM: 15265: {{2},{1,4},{1,1,3}}

Examples

			The sequence of all lexicographically normalized multiset partitions together with their MM-numbers begins:
   1:               63: {1}{1}{11}      159: {1}{1111}
   3: {1}           69: {1}{22}         161: {11}{22}
   7: {11}          81: {1}{1}{1}{1}    165: {1}{2}{3}
   9: {1}{1}        89: {1112}          169: {12}{12}
  13: {12}          91: {11}{12}        171: {1}{1}{111}
  15: {1}{2}       105: {1}{2}{11}      183: {1}{122}
  19: {111}        111: {1}{112}        189: {1}{1}{1}{11}
  21: {1}{11}      113: {123}           195: {1}{2}{12}
  27: {1}{1}{1}    117: {1}{1}{12}      207: {1}{1}{22}
  37: {112}        131: {11111}         223: {11112}
  39: {1}{12}      133: {11}{111}       225: {1}{1}{2}{2}
  45: {1}{1}{2}    135: {1}{1}{1}{2}    243: {1}{1}{1}{1}{1}
  49: {11}{11}     141: {1}{23}         247: {12}{111}
  53: {1111}       147: {1}{11}{11}     259: {11}{112}
  57: {1}{111}     151: {1122}          267: {1}{1112}
		

Crossrefs

Equals the odd terms of A330120.
A subset of A320634.
MM-weight is A302242.
Non-isomorphic multiset partitions are A007716.
Other fixed points:
- Brute-force: A330104 (multisets of multisets), A330107 (multiset partitions), A330099 (set-systems).
- Lexicographic: A330120 (multisets of multisets), A330121 (multiset partitions), A330110 (set-systems).
- VDD: A330060 (multisets of multisets), A330097 (multiset partitions), A330100 (set-systems).
- MM: A330108 (multisets of multisets), A330122 (multiset partitions), A330123 (set-systems).
- BII: A330109 (set-systems).

A330122 MM-numbers of MM-normalized multiset partitions.

Original entry on oeis.org

1, 3, 7, 9, 13, 15, 19, 21, 27, 35, 37, 39, 45, 49, 53, 57, 63, 81, 89, 91, 95, 105, 111, 113, 117, 131, 133, 135, 141, 147, 151, 159, 161, 165, 169, 171, 175, 183, 189, 195, 223, 225, 243, 245, 247, 259, 265, 267, 273, 281, 285, 311, 315, 329, 333, 339, 343
Offset: 1

Views

Author

Gus Wiseman, Dec 05 2019

Keywords

Comments

We define the MM-normalization of a multiset of multisets to be obtained by first normalizing so that the vertices cover an initial interval of positive integers, then applying all permutations to the vertex set, and finally taking the representative with the smallest MM-number.
For example, 15301 is the MM-number of {{3},{1,2},{1,1,4}}, which has the following normalizations together with their MM-numbers:
Brute-force: 43287: {{1},{2,3},{2,2,4}}
Lexicographic: 43143: {{1},{2,4},{2,2,3}}
VDD: 15515: {{2},{1,3},{1,1,4}}
MM: 15265: {{2},{1,4},{1,1,3}}
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}}.

Examples

			The sequence of all MM-normalized multiset partitions together with their MM-numbers begins:
   1: 0             57: {1}{111}        151: {1122}
   3: {1}           63: {1}{1}{11}      159: {1}{1111}
   7: {11}          81: {1}{1}{1}{1}    161: {11}{22}
   9: {1}{1}        89: {1112}          165: {1}{2}{3}
  13: {12}          91: {11}{12}        169: {12}{12}
  15: {1}{2}        95: {2}{111}        171: {1}{1}{111}
  19: {111}        105: {1}{2}{11}      175: {2}{2}{11}
  21: {1}{11}      111: {1}{112}        183: {1}{122}
  27: {1}{1}{1}    113: {123}           189: {1}{1}{1}{11}
  35: {2}{11}      117: {1}{1}{12}      195: {1}{2}{12}
  37: {112}        131: {11111}         223: {11112}
  39: {1}{12}      133: {11}{111}       225: {1}{1}{2}{2}
  45: {1}{1}{2}    135: {1}{1}{1}{2}    243: {1}{1}{1}{1}{1}
  49: {11}{11}     141: {1}{23}         245: {2}{11}{11}
  53: {1111}       147: {1}{11}{11}     247: {12}{111}
		

Crossrefs

Equals the odd terms of A330108.
A subset of A320456.
Non-isomorphic multiset partitions are A007716.
MM-weight is A302242.
Other fixed points:
- Brute-force: A330104 (multisets of multisets), A330107 (multiset partitions), A330099 (set-systems).
- Lexicographic: A330120 (multisets of multisets), A330121 (multiset partitions), A330110 (set-systems).
- VDD: A330060 (multisets of multisets), A330097 (multiset partitions), A330100 (set-systems).
- MM: A330108 (multisets of multisets), A330122 (multiset partitions), A330123 (set-systems).
- BII: A330109 (set-systems).

Programs

  • Mathematica
    primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
    mmnorm[m_]:=If[Union@@m!={}&&Union@@m!=Range[Max@@Flatten[m]],mmnorm[m/.Rule@@@Table[{(Union@@m)[[i]],i},{i,Length[Union@@m]}]],First[SortBy[brute[m,1],Map[Times@@Prime/@#&,#,{0,1}]&]]];
    brute[m_,1]:=Table[Sort[Sort/@(m/.Rule@@@Table[{i,p[[i]]},{i,Length[p]}])],{p,Permutations[Union@@m]}];
    Select[Range[1,100,2],Sort[primeMS/@primeMS[#]]==mmnorm[primeMS/@primeMS[#]]&]
Previous Showing 41-50 of 206 results. Next