A329630 Products of distinct primes of nonprime squarefree index.

1, 2, 13, 26, 29, 43, 47, 58, 73, 79, 86, 94, 101, 113, 137, 139, 146, 149, 158, 163, 167, 181, 199, 202, 226, 233, 257, 269, 271, 274, 278, 293, 298, 313, 317, 326, 334, 347, 349, 362, 373, 377, 389, 397, 398, 421, 439, 443, 449, 466, 467, 487, 491, 499, 514

Offset: 1

Author

Gus Wiseman, Nov 18 2019

Keywords

• nonn

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}}. This sequence lists all MM-numbers of sets of non-singleton sets.

Examples

			The sequence of terms together with their corresponding sets of sets begins:
    1: {}
    2: {{}}
   13: {{1,2}}
   26: {{},{1,2}}
   29: {{1,3}}
   43: {{1,4}}
   47: {{2,3}}
   58: {{},{1,3}}
   73: {{2,4}}
   79: {{1,5}}
   86: {{},{1,4}}
   94: {{},{2,3}}
  101: {{1,6}}
  113: {{1,2,3}}
  137: {{2,5}}
  139: {{1,7}}
  146: {{},{2,4}}
  149: {{3,4}}
  158: {{},{1,5}}
  163: {{1,8}}
		

Crossrefs

MM-numbers of sets of nonempty sets are A329629.

Products of primes of nonprime squarefree index are A320630.

Products of prime numbers of squarefree index are A302478.

Products of primes of nonprime index are A320628.

Cf. A005117, A056239, A112798, A302242, A302494, A329557.

Classes of MM-numbers: A305078 (connected), A316476 (antichains), A318991 (chains), A320456 (covers), A329559 (clutters).

Programs

Mathematica

primeMS[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Select[Range[100],SquareFreeQ[#]&&And@@SquareFreeQ/@primeMS[#]&&!MemberQ[primeMS[#],_?PrimeQ]&]