x <- c(1, 3, 6)
ciMean(x) # 95% confidence interval
ciMean(x, conf = 0.80) # 80% confidence interval
# for comparison: equivalent result via lm
confint(lm(x ~ 1))
# missing values
x <- c(1, 3, NA, 6)
ciMean(x, na.rm = TRUE)
Run the code above in your browser using DataLab