powered by
Calculate the equal surplus division value
equal_surplus_division(characteristic_func, n_players = 0)
The equal surplus division value for each player
The valued function defined on the subsets of the number of players
Only used if characteristic_func is a function. The number of players in the game.
characteristic_func
function
n <- 10 v <- function(coalition) { if (length(coalition) > n/2) { return(1) } else { return(0) } } equal_surplus_division(v,n)
Run the code above in your browser using DataLab