powered by
Modified Sainte-Lague method for seats allocation.
saintelaguemod(votes, seats, threshold = 0, div = 1.4, verbose = TRUE)
Un vector con los seats asignados a cada partido.
Un vector con los votos de cada partido.
Total de seats a repartir.
Umbral electoral
Divisor modificado en Modified Sainte-Lague
Muestra los resultados en la consola
votes <- c(A = 100000, B = 75000, C = 50000, D = 25000) saintelaguemod(votes, 10)
Run the code above in your browser using DataLab