Wolfram Language Paclet Repository
Community-contributed installable additions to the Wolfram Language
PeterBurbery`Combinatorics`
MultisetAssociation |
|
| | ||||
Examples
(1)
Basic Examples
(1)
Random multiset:
In[1]:=
randomMultiset=RandomChoice[{LightRed,LightGreen,LightBlue,LightPurple,LightOrange},30]
Out[1]=
An association for the multiset:
In[2]:=
Association[MapIndexed[Identity@@#2#1&,randomMultiset]]
Out[2]=
1
In[3]:=
 | MultisetAssociation |
Out[3]=
1
Sometimes we might want to count the elements of a multiset as unique, even if they have the same value like how 1 has LightBlue and 3 has LightBlue they are equivalent, but maybe we want to analyze their differences like how one is at position 1 and the other is at position 3. This is why this function MultisetAssociation is useful.
In[4]:=
Keys
[randomMultiset]
 | MultisetAssociation |
Out[4]=
{1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30}
Here is the canonical multiset.
In[5]:=
| CanonicalMultiset |
Out[5]=
{1,1,1,2,2,2,1,4,4,5,1,2,4,4,4,4,4,4,3,2,2,2,1,3,2,2,3,5,1,4}
 |
|
 |
|
""