%I #6 Sep 13 2022 09:36:14
%S 1,2,3,4,6,7,8,9,12,13,14,16,18,19,21,24,26,27,28,32,36,37,38,39,42,
%T 48,49,52,53,54,56,57,61,63,64,72,74,76,78,81,84,89,91,96,98,104,106,
%U 108,111,112,113,114,117,122,126,128,131,133,144,147,148,151,152
%N MM-numbers of multisets of multisets, each covering an initial interval. Products of primes indexed by elements of A055932.
%C An initial interval is a set {1,2,...,n} for some n >= 0.
%C 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.
%C We define the multiset of multisets with MM-number n to be formed by taking the multiset of prime indices of each part of the multiset of prime indices of n. The size of this multiset of multisets is A302242(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}}.
%H Gus Wiseman, <a href="https://docs.google.com/document/d/e/2PACX-1vR-C_picqWlu0KOguRGWaPjhS2HY7m43aGXGDcolDh4Qtyy-pu2lkq5mbHAbiMSyQoiIESG2mCGtc2j/pub">Counting and ranking classes of multiset partitions related to gapless multisets</a>
%e The initial terms and corresponding multisets of multisets:
%e 1: {}
%e 2: {{}}
%e 3: {{1}}
%e 4: {{},{}}
%e 6: {{},{1}}
%e 7: {{1,1}}
%e 8: {{},{},{}}
%e 9: {{1},{1}}
%e 12: {{},{},{1}}
%e 13: {{1,2}}
%e 14: {{},{1,1}}
%e 16: {{},{},{},{}}
%e 18: {{},{1},{1}}
%e 19: {{1,1,1}}
%e 21: {{1},{1,1}}
%e 24: {{},{},{},{1}}
%e 26: {{},{1,2}}
%e 27: {{1},{1},{1}}
%e 28: {{},{},{1,1}}
%e 32: {{},{},{},{},{}}
%t primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
%t normQ[m_]:=Or[m=={},Union[m]==Range[Max[m]]];
%t Select[Range[100],And@@normQ/@primeMS/@primeMS[#]&]
%Y Multisets covering an initial interval are ctd by A011782, rkd by A055932.
%Y This is the initial version of A356944.
%Y Other types: A034691, A089259, A356945, A356954.
%Y Other conditions: A302478, A302492, A356930, A356935, A356939, A356940.
%Y A000041 counts integer partitions, strict A000009.
%Y A000670 counts patterns, ranked by A333217, necklace A019536.
%Y A000688 counts factorizations into prime powers.
%Y A001055 counts factorizations.
%Y A001221 counts prime divisors, sum A001414.
%Y A001222 counts prime factors with multiplicity.
%Y A056239 adds up prime indices, row sums of A112798.
%Y Cf. A000040, A000720, A003963, A055887, A076610, A270995, A302242, A304969, A349050, A349055.
%K nonn
%O 1,2
%A _Gus Wiseman_, Sep 12 2022