# NOT RUN {
# Cooperative game
game <- c(68, 102, 0, 170, 710, 762, 992)
# Shapley Value
shapleyValue(game, show.data = TRUE)
# -----------------------------
# Shapley Value Solution:
# -----------------------------
# [1] "(229, 272, 491)"
# }
Run the code above in your browser using DataLab