R/spinner_data.R

In bayesball/ProbBayes: Probability and Bayesian Modeling

Defines functions spinner_data

Documented in spinner_data

spinner_data <- function(regions, nsim=1000){
  sample(length(regions), size=nsim,
         prob=regions, replace=TRUE)
}