# NOT RUN {
# See full set of examples in resample-package, including different
# ways to call all four functions depending on the structure of the data.
data(Verizon)
CLEC <- with(Verizon, Time[Group == "CLEC"])
bootC <- bootstrap(CLEC, mean, seed = 0)
bootC2 <- bootstrap(CLEC, c(mean = mean(CLEC), sd = sd(CLEC)), seed = 0)
limits.percentile(bootC)
limits.t(bootC)
limits.bootstrapT(bootC2)
# }
Run the code above in your browser using DataLab