變量作為R中的列的線性回歸

Question

我的目標是從Python獲取變量（在這種情況下為列名稱），然后在R中處理它們。當我嘗試執行線性回歸時，例如：

cropeareatable<-matrix(c(111111,222222,333333,2222222),ncol=2,byrow=TRUE)
colnames(cropeareatable)<-c('Canola_RE','Canola_CI')
cropeareatable

x<-(colnames(cropeareatable))
re <-x[0]
ci<-x[1]
linreg<-lm(table$re~table$ci)

編輯：更改為可復制

收到錯誤：table $ re中的錯誤：“ closure”類型的對象不可子集化

這是行不通的。 我研究了它，並嘗試了許多不同的方法

呼叫

regress<-do.call(rlm,list(cropareatable[3],cropareatable[4]),quote=FALSE)
regress<-do.call(rlm,list(x[3],y[4]),quote=FALSE)

quote（）+評估：

x<-(colnames(cropareatable))
    re <-quote(x[3])
    ci<-quote(x[4])
    linreg<-lm(table$eval(re)~table$eval(ci))

我也嘗試過公式構建，數據框架構建，as.list，但是我根本無法使回歸工作。

Answer 1

有幾個問題。 首先是選擇re和ci並使用基本索引0 ，但是R從1索引。

re <- x[1]
ci <- x[2]

然后要建立索引，我們可以使用[運算符，而不是嘗試使用$

lm(cropeareatable[, re] ~ cropeareatable[, ci])