A348148 Numbers k for which sigma(k)/k = 32/9.
3780, 66960, 167400, 406224, 1097280, 6656832, 13035330, 29410290, 4529295360, 27477725184, 88071903612, 1159632322560, 7035102756864, 18554223329280, 22385029489560, 54934276752360, 112562288197632, 125356165141536, 307631949813216
Offset: 1
Keywords
Examples
167400 is a term, since sigma(167400)/167400 = 595200/167400 = 32/9.
Links
- G. P. Michon, Multiperfect Numbers and Hemiperfect Numbers
- Walter Nissen, Abundancy: Some Resources (preliminary version 4)
- Walter Nissen, Primitive Friendly Pairs with friends < 2^34 with denom < 20000
Programs
-
Mathematica
Select[Range[5*10^8], DivisorSigma[1, #]/# == 32/9 &] Do[If[DivisorSigma[1, k]/k == 32/9, Print[k]], {k, 5*10^8}]
Comments