Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/72.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 如何执行无误差的线性回归?_R - Fatal编程技术网

R 如何执行无误差的线性回归?

R 如何执行无误差的线性回归?,r,R,我试图做一个OLS回归,我不断得到一个错误消息,某个变量找不到。我是R的新手 除最后一行外,所有代码都有效 load("psub.Rdata") VarsForOLS.tbl <- psub %>% mutate(personalIncome = PINCP, groupingID = ORIGRANDGROUP, age = AGEP, sex = SEX, workingclass = COW, educationalLevel = SCHL) %>% select(

我试图做一个OLS回归,我不断得到一个错误消息,某个变量找不到。我是R的新手

除最后一行外,所有代码都有效

load("psub.Rdata")

VarsForOLS.tbl <- psub %>%
  mutate(personalIncome = PINCP, groupingID = ORIGRANDGROUP, age = AGEP, sex = SEX, workingclass = COW, educationalLevel = SCHL) %>%
select(personalIncome, groupingID, age, sex, workingclass, educationalLevel)

trainingIncome.data <- subset(VarsForOLS.tbl, groupingID >=500)
testingIncome.data <- subset(VarsForOLS.tbl, groupingID < 500)

y <- "log(personalIncome, base=10)"
explanatoryVariables <- c("age", "sex", "workingclass", "educationLevel")

olsModel <- paste(y, paste(explanatoryVariables, collapse = "+"), sep = "-")

trainingIncome.ols <- lm(olsModel, data = trainingIncome.data)

为了得到最好的帮助,你应该发布一篇文章

您正在使用a-生成公式,a-应该是a~。更妙的是,@benbolker建议使用这个方便的功能


奥尔斯莫尔在修正了公式后,也许奥尔斯莫尔更容易,因为奥尔斯莫尔不知道函数的存在,非常感谢@Ben。我已经更新了答案
Error in eval(parse(text = x, keep.source = FALSE)[[1L]]) : 
  object 'personalIncome' not found