# NOT RUN {
library(CoopGame)
shapleyShubikIndex(v=c(0,0,0,0,1,0,1))
# }
# NOT RUN {
#Example from Stach (2011):
library(CoopGame)
v=weightedVotingGameVector(n=4,q=50,w=c(10,10,20,30))
shapleyShubikIndex(v)
#[1] 0.08333333 0.08333333 0.25000000 0.58333333
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab