login
A238764
Numbers m such that A008474(m) divides m.
1
4, 20, 36, 50, 54, 64, 112, 120, 180, 192, 210, 220, 240, 270, 288, 300, 364, 392, 425, 432, 448, 450, 504, 528, 550, 560, 624, 648, 729, 748, 750, 756, 792, 858, 918, 924, 936, 972, 975, 988, 1040, 1134, 1188, 1190, 1210, 1274, 1280, 1300, 1326, 1372, 1400, 1428, 1440, 1456, 1472, 1539
OFFSET
1,1
COMMENTS
If m = Product (p_i ^ a_i) then Sum (p_i + a_i) divides m.
LINKS
EXAMPLE
A008474(20) = 10 and 10 is a divisor of 20.
MATHEMATICA
Select[Range[2000], Mod[#, Plus @@ Flatten@ FactorInteger@ #] == 0 &] (* Giovanni Resta, Mar 05 2014 *)
CROSSREFS
Cf. A008474.
Sequence in context: A172624 A043880 A030002 * A085805 A119413 A044446
KEYWORD
nonn,easy
AUTHOR
Ivan N. Ianakiev, Mar 05 2014
STATUS
approved