randomNum <- sample(1:1000, size = 25 * 10, replace = TRUE)
counts <- matrix(randomNum, nrow = 25, ncol = 10)
prop <- perb(counts, ivar = 0, iter = 0)
prop[1:5, ]
prop$prop
prop[1:5, "prop"]
subset(prop, 1:5)
Run the code above in your browser using DataLab