r - R 引导错误 - 未找到“原始”

Question

我正在尝试在 glm 中引导参数估计的标准误差，并且在引导步骤中遇到了一些问题。我已经将我的功能定义如下......

boot.fn=function(data,index){
          return(eval(substitute(coef(glm(glm.formula,
                      family = tweedie(var.power=1.5,link.power=0),
                      data=data,
                      subset=index,
                      weights=EXPOSURE_COLL
                      )))))  
}

...并且此功能自行运行而不会出错。但是，当我运行引导程序时...

set.seed(1977)
boot(coll.train,boot.fn,1000)

...我收到以下错误消息：

Error in eval(expr, envir, enclos) : object 'original' not found 

非常感谢任何人可以提供的任何帮助！