x <- d.pizza$price[1:20]
MeanCI(x, na.rm=TRUE)
MeanCI(x, conf.level=0.99, na.rm=TRUE)
# the different types of bootstrap confints
MeanCI(x, type="norm", na.rm=TRUE)
MeanCI(x, type="norm", trim=0.1, na.rm=TRUE)
MeanCI(x, type="basic", trim=0.1, na.rm=TRUE)
# MeanCI(x, type="stud", trim=0.1, na.rm=TRUE), this needs some more information
MeanCI(x, type="perc", trim=0.1, na.rm=TRUE)
MeanCI(x, type="bca", trim=0.1, na.rm=TRUE)
# Getting the MeanCI for more than 1 column
round( do.call("rbind", lapply(d.pizza[,1:4], MeanCI, na.rm=TRUE)), 3)
Run the code above in your browser using DataLab