# NOT RUN {
library(CoopGame)
divideTheDollarGameVector(n=3)
# }
# NOT RUN {
library(CoopGame)
(v <- divideTheDollarGameVector(n=4))
#Output:
# [1] 0 0 0 0 1 1 1 1 1 1 1 1 1 1 1
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab