|
|
A350372
|
|
Numbers with exactly 5 semiprime divisors.
|
|
5
|
|
|
180, 252, 300, 360, 396, 450, 468, 504, 540, 588, 600, 612, 684, 700, 720, 756, 792, 828, 882, 936, 980, 1008, 1044, 1080, 1100, 1116, 1176, 1188, 1200, 1224, 1300, 1332, 1350, 1368, 1400, 1404, 1440, 1452, 1476, 1500, 1512, 1548, 1575, 1584, 1620, 1656, 1692, 1700
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
q[n_] := DivisorSum[n, 1 &, PrimeOmega[#] == 2 &] == 5; Select[Range[1700], q] (* Amiram Eldar, Dec 28 2021 *)
|
|
PROG
|
(PARI) isok(k) = sumdiv(k, d, bigomega(d)==2) == 5; \\ Michel Marcus, Dec 28 2021
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|