Simulate random data from a spinner
spinner_data(regions, nsim=1000)
regions
: vector of integer values for the spins 1, 2, ...nsim
: number of spinsA vector of random spins from the spinner
Jim Albert
regions <- c(2, 1, 1, 2) spinner_data(regions, nsim=20)