x <- d.pizza$price[d.pizza$driver=="Carter"]
y <- d.pizza$price[d.pizza$driver=="Miller"]
MeanDiffCI(x, y, na.rm=TRUE)
MeanDiffCI(x, y, conf.level=0.99, na.rm=TRUE)
# the different types of bootstrap confints
MeanDiffCI(x, y, type="norm", na.rm=TRUE)
MeanDiffCI(x, y, type="basic", na.rm=TRUE)
# MeanDiffCI(x, y, type="stud", na.rm=TRUE)
MeanDiffCI(x, y, type="perc", na.rm=TRUE)
MeanDiffCI(x, y, type="bca", na.rm=TRUE)
Run the code above in your browser using DataLab