egalitarian {TUvalues} | R Documentation |
Calculate the egalitarian value
egalitarian(characteristic_func, n_players = 0)
characteristic_func |
The valued function defined on the subsets of the number of players |
n_players |
Only used if |
The egalitarian value for each player
n <- 10
v <- function(coalition) {
if (length(coalition) > n/2) {
return(1)
} else {
return(0)
}
}
egalitarian(v,n)