无法修复R中未找到的对象“数据集”

Question

我正在尝试编写一个将拟合线性模型传递给ncvTest（）的函数。

runFun <- function(var, dataset){
  model <- lm(formula(var),  data = dataset) # linear fit model
  ncvOut<- ncvTest(model)
  return(ncvOut)
}

runFun(SALES~Time,FOCData)

但它低于错误：

Error in eval(data, envir = environment(formula(model))) : 
  object 'dataset' not found 

有人可以帮我解决这个问题吗？

Answer 1

1. 首先确保设置正确的工作目录。
2. 你以前做过数据集吗？在创建它之前它不可能存在
3. 如果您之前没有数据集，请将数据读取到数据集变量中 例如：
＆＃13;
＆＃13;
dataset<-read.table('data.txt',header = T)
＆＃13;
＆＃13;
＆＃13;
1. 尝试是否有效

记住R函数是：

myfunction <- function(arg1, arg2, ... ){
statements
return(object)
}