求教 关于R语言中的boot函数：
boot(data,statistic,R,...)

statistic= function(dat,ind)
这里的dat是每次从data中抽取一个bootstrap样本吗？
如果R设为100，那么，这100次的dat和ind是都不同的吗？

下面代码是想从bootstrap样本中进行Monte Carlo模拟，请问这样子对吗？？？
set.seed(1234)
theat.acf_95 <- function(dat,ind){
  acfood1 <- dat[ind,1]*0.3
  acfood4 <- dat[ind,4]*0.5
  su <- (acfood1+acfood4)/21.32

  acf1 <- sample(dat[,1],100000,replace = T)*0.3
  acf4 <- sample(dat[,4],100000,replace = T)*0.5
  s <- (acf1+acf4)/21.32

  S <- c(su,s)
  a <- quantile(S,0.95)
  a
}
boot.obj1_95 <- boot(data=ACfood,statistic=theat.acf_95,R=2000)