SLIDE 1
- chisq.test(x, y) runs <- 1000 rbeta(runs, shape1, shape2) - - PowerPoint PPT Presentation
- chisq.test(x, y) runs <- 1000 rbeta(runs, shape1, shape2) - - PowerPoint PPT Presentation
- 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,
SLIDE 2
SLIDE 3
SLIDE 4
SLIDE 5
SLIDE 6
SLIDE 7
SLIDE 8
SLIDE 9
chisq.test(x, y)
SLIDE 10
SLIDE 11
SLIDE 12
SLIDE 13
runs <- 1000 rbeta(runs, shape1, shape2)
SLIDE 14
runs <- 1000 experiment_1 <- rbeta(runs, shape1, shape2) experiment_2 <- rbeta(runs, shape1, shape2)
SLIDE 15
SLIDE 16
runs <- 1000 experiment_1 <- rdirichlet(runs, alpha = c(a, b, n)) experiment_2 <- rdirichlet(runs, alpha = c(a, b, n))
SLIDE 17
SLIDE 18
SLIDE 19
Runs <- 1000 rbeta(runs, shape1 + prior1, shape2 + prior2)
SLIDE 20