R中的Bootstrap置信区间

我是新用户,使用启动包时遇到问题.我想要做的就是使用自举来为数字向量的均值周围产生置信区间,例如：

x <- rnorm(100, 1, .5)

有小费吗？

以下不够吗？

library(boot)
x <- rnorm(100, 1, .5)
b <- boot(x, function(u,i) mean(u[i]), R = 999)
boot.ci(b, type = c("norm", "basic", "perc"))