Randomly assigns a sample of participants into k groups.
randomize(n)
k x 1 vector of sample sizes
Returns a vector of randomly generated group assignments
n <- c(10, 10, 5)
randomize(n)
#> [1] 3 1 2 1 1 1 2 3 2 1 3 3 1 1 1 1 2 2 2 1 2 2 3 2 2
# Should return:
# [1] 2 3 2 1 1 2 3 3 2 1 2 1 3 1 1 2 3 1 1 2 2 1 1 2 2