dat <- data.frame(group1 = c(1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2),
group2 = c(1, 1, 1, 2, 2, 2, 1, 1, 1, 2, 2, 2),
x1 = c(3, 1, 4, 2, 5, 3, 2, 4, NA, 4, 5, 3),
x2 = c(4, NA, 3, 6, 3, 7, 2, 7, 5, 1, 3, 6),
x3 = c(7, 8, 5, 6, 4, NA, 8, NA, 6, 5, 8, 6))
# Two-Sided 95% Confidence Interval for x1
ci.mean(dat$x1)
# Two-Sided 95% Difference-Adjusted Confidence Interval for x1
ci.mean(dat$x1, adjust = TRUE)
# Two-Sided 95% Confidence Interval with known standard deviation for x1
ci.mean(dat$x1, sigma = 1.2)
# Two-Sided 95% Confidence Interval with known variance for x1
ci.mean(dat$x1, sigma2 = 2.5)
# One-Sided 95% Confidence Interval for x1
ci.mean(dat$x1, alternative = "less")
# Two-Sided 99% Confidence Interval
ci.mean(dat$x1, conf.level = 0.99)
# Two-Sided 95% Confidence Interval, print results with 3 digits
ci.mean(dat$x1, digits = 3)
# Two-Sided 95% Confidence Interval for x1, convert value 4 to NA
ci.mean(dat$x1, as.na = 4)
# Two-Sided 95% Confidence Interval for x1, x2, and x3,
# listwise deletion for missing data
ci.mean(dat[, c("x1", "x2", "x3")], na.omit = TRUE)
# Two-Sided 95% Confidence Interval for x1, x2, and x3,
# analysis by group1 separately
ci.mean(dat[, c("x1", "x2", "x3")], group = dat$group1)
# Two-Sided 95% Confidence Interval for x1, x2, and x3,
# analysis by group1 separately, sort by variables
ci.mean(dat[, c("x1", "x2", "x3")], group = dat$group1, sort.var = TRUE)
# Two-Sided 95% Confidence Interval for x1, x2, and x3,
# split analysis by group1
ci.mean(dat[, c("x1", "x2", "x3")], split = dat$group1)
# Two-Sided 95% Confidence Interval for x1, x2, and x3,
# analysis by group1 separately, split analysis by group2
ci.mean(dat[, c("x1", "x2", "x3")], group = dat$group1, split = dat$group2)
Run the code above in your browser using DataLab