Proper divisors: Difference between revisions

Line 692:
(1..10).map{|n| puts "#{n}: #{n.proper_divisors}"}
 
maxsize, select = (1..20_000).group_by{|n| n.proper_divisors.size}.max.last
maxselect.each do |n|
puts "#{n} has #{n.proper_divisors.size} divisors"
end</lang>
 
Line 718:
require "prime"
n, g = 0
(1..20000).each{|i| e = i.prime_division.inject(1){|n,g| n *= (g[1]+1)}
n, g = e, i if e > n}
puts "#{g} has #{n-1} proper divisors"</lang>
Anonymous user