#' # 2012 Queensland state elecion
pvotes= c(49.65, 26.66, 11.5, 7.53, 3.16, 1.47)
pseats = c(87.64, 7.87, 2.25, 0.00, 2.25, 0.00)
Proportionality(pvotes, pseats) # default is Gallagher
Proportionality(pvotes, pseats, index="Rae")
# Proportionality(pvotes, pseats, index="Cox-Shugart")
# 2012 Quebec provincial election:
pvotes = c(PQ=31.95, Lib=31.20, CAQ=27.05, QS=6.03, Option=1.89, Other=1.88)
pseats = c(PQ=54, Lib=50, CAQ=19, QS=2, Option=0, Other=0)
Proportionality(pvotes, pseats, index="Rae")
Run the code above in your browser using DataLab