## Confidence interval for a mean
x <- seq(from = -4, to = 4, by = 0.01)
y <- dnorm(x)
confidence_mean(y, type = "student")
confidence_mean(y, type = "normal")
## Confidence interval for a propotion
confidence_binomial(118, n = 236)
x <- c(35, 74, 22, 69)
confidence_multinomial(x)
Run the code above in your browser using DataLab