OFFSET
1,1
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. 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}}.
EXAMPLE
The terms and corresponding multisets of multisets:
35: {{2},{1,1}}
65: {{2},{1,2}}
70: {{},{2},{1,1}}
95: {{2},{1,1,1}}
105: {{1},{2},{1,1}}
130: {{},{2},{1,2}}
140: {{},{},{2},{1,1}}
143: {{3},{1,2}}
145: {{2},{1,3}}
169: {{1,2},{1,2}}
175: {{2},{2},{1,1}}
185: {{2},{1,1,2}}
MATHEMATICA
primeMS[n_]:=If[n==1, {}, Flatten[Cases[FactorInteger[n], {p_, k_}:>Table[PrimePi[p], {k}]]]];
Select[Range[100], MatchQ[primeMS[#], {___, x_, y_, ___}/; Max@@primeMS[x]>Min@@primeMS[y]]&]
Select[Range[100], !LessEqual@@Join@@primeMS/@primeMS[#]&]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Sep 30 2022
STATUS
approved