From: Martin DeMello <martindemello@...>
Date: 2007-02-08T06:13:24+09:00
Subject: Re: histogram of histograms

On 2/8/07, Charles L. Snyder <clsnyder@gmail.com> wrote:
>
> I need to iterate through the above file(s) and get the data
> summarized in the form:
>
> Canada, 252
> China, 91
> Chile, 4
> Brazil, 32
> Bulgaria, 1

#------------------------------------------------------------------
countries = <<HERE
Brazil, 10
Brazil, 13
Brazil, 9
Bulgaria, 1
Canada, 48
Canada, 52
Canada, 38
Canada, 55
Canada, 59
Chile, 1
Chile, 1
Chile, 2
China, 7
China, 18
China, 19
China, 22
China, 25
HERE

totals = Hash.new {|h, k| h[k] = 0}

countries.each_line {|line|
	country, n = line.split(/,\s*/)
	totals[country] += n.to_i
}

totals.keys.sort_by {|i| -totals[i]}.each {|c|
	puts "#{c}, #{totals[c]}"
}

#------------------------------------------------------------------

martin