# Two Group Designs
clusters <- rep(letters, times = 1:26)
probs <- cluster_rs_probabilities(clusters = clusters)
table(probs, clusters)
prob_mat <- cluster_rs_probabilities(clusters = clusters, n = 10)
table(probs, clusters)
prob_mat <- cluster_rs_probabilities(clusters = clusters, prob = .3)
table(probs, clusters)
Run the code above in your browser using DataLab