|
|
A248662
|
|
Numbers with the property: tau(n) > sopfr(n), or A000005(n) > A001414(n).
|
|
1
|
|
|
1, 120, 144, 180, 216, 240, 252, 288, 300, 336, 360, 420, 432, 480, 504, 540, 576, 600, 630, 648, 660, 672, 720, 756, 792, 810, 840, 864, 900, 960, 1008, 1050, 1080, 1120, 1152, 1176, 1200, 1260, 1296, 1320, 1344, 1350, 1400, 1440, 1500, 1512, 1560
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
The number of divisors exceeds the sum of its prime factors, with repetition.
These are a subset of the abundant numbers = A005101.
The numbers where tau(n) = sopfr(n) are given by A078511.
|
|
LINKS
|
|
|
MATHEMATICA
|
ResultList = {1}; Do[
If[ (DivisorSigma[0, k] > Total[Times @@@ FactorInteger[k]]),
AppendTo[ResultList, k]], {k, 2, 10000}]; ResultList
|
|
PROG
|
(PARI) isok(n) = my(f=factor(n)); sum(i=1, #f~, f[i, 1]*f[i, 2]) < numdiv(n); \\ Michel Marcus, Jun 22 2019
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|