-
chisq.test(x, y)
runs <- 1000 rbeta(runs, shape1, shape2)
runs <- 1000 experiment_1 <- rbeta(runs, shape1, shape2) experiment_2 <- rbeta(runs, shape1, shape2)
runs <- 1000 experiment_1 <- rdirichlet(runs, alpha = c(a, b, n)) experiment_2 <- rdirichlet(runs, alpha = c(a, b, n))
Runs <- 1000 rbeta(runs, shape1 + prior1, shape2 + prior2)
-
Recommend
More recommend