Adrian Short 10 年之前
當前提交
1cc7182279
共有 1 個文件被更改,包括 43 次插入0 次删除
  1. +43
    -0
      dhondt.rb

+ 43
- 0
dhondt.rb 查看文件

@@ -0,0 +1,43 @@
# D'Hondt method calculations
# https://en.wikipedia.org/wiki/D'Hondt_method
# By Adrian Short (@adrianshort) 26 May 2014

# European Parliament election, London region, 22 May 2014

@parties = {
'4 Freedoms Party (UK EPP)' => 28014,
'An Independence from Europe' => 26675,
'Animal Welfare Party' => 21092,
'British National Party' => 19246,
'Christian Peoples Alliance' => 23702,
'Communities United Party' => 6951,
'Conservative Party' => 495639,
'English Democrats' => 10142,
'Europeans Party' => 10712,
'Green Party' => 196419,
'Harmony Party' => 1985,
'Labour Party' => 806959,
'Liberal Democrats' => 148013,
'National Health Action Party' => 23253,
'National Liberal Party True Liberalism' => 6736,
'NO2EU' => 3804,
'UK Independence Party (UKIP)' => 371133
}

@seats = 8 # Total number of seats to be elected in this district

@averages = []

@parties.each do |party|
(1..@seats).each do |denominator|
@averages << [ party[0], party[1] / denominator ]
end
end

@winners = @averages.sort { |a,b| b[1] <=> a[1] }[0..@seats - 1]

puts "Place. Party"

(1..@seats).each do |place|
puts "%d. %s" % [ place, @winners[place - 1][0]]
end

Loading…
取消
儲存