# NOT RUN {
library(CoopGame)
v=c(0,0,0,1,1,0,3)
drawPrenucleolus(v)
# }
# NOT RUN {
#Visualization for estate division problem from Babylonian Talmud with E=200,
#see e.g. seminal paper by Aumann & Maschler from 1985 on
#'Game Theoretic Analysis of a Bankruptcy Problem from the Talmud'
library(CoopGame)
v<-bankruptcyGameVector(n=3,d=c(100,200,300),E=200)
drawPrenucleolus(v)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab