R function for calculating the one-dimensional unanimity / QMV core size given actors' preferences and voting weights. Can be used to calculate the core size in the EU Council of Ministers. The
eucouncil_weights.csv contains data on the EU Council voting weights (EU9-EU28), the corresponding
eucouncil_weights.md describes the data.
This examples calculates the unanimity and QMV core size for a hypothetical EU Council with 5 members. Two sets of votingweights are used (
voteweights, popweights) and the corresponding voting threshold rules (
qmin is the minority criteria (at least one member has to agree).
x <- c(0,15,50,80,400) voteweights <- c(10,20,20,10,30) popweights <- c(5,10,40,50,5) qmin <- 1 # miniority criteria qvote <- 9 # voting weights threshold qpop <- 4 # population weights threshold ( unanimity <- coresize(x, "unanimity", voteweights=voteweights, popweights=popweights, qmin=qmin, qvote=qvote, qpop=qpop) ) ( qmv <- coresize(x, "qmv", voteweights=voteweights, popweights=popweights, qmin=qmin, qvote=qvote, qpop=qpop) )
When you want to caculate the core size using only voting weights (but not the population weights) just use a threshold that is always passed. For example:
popweights <- rep(10,5) qpop <- qpop1