[問題類型]:
程式諮詢(我想用R 做某件事情，但是我不知道要怎麼用R 寫出來)
[軟體熟悉度]:
入門(寫過其他程式，只是對語法不熟悉)
[問題敘述]:
建立多個lm模型，用loop存入一個list，給 $reg1, $reg2, ...等名字
建立多個變數，用loop存取這些lm的coefficient[[2]]，就是想存斜率
如下code，卡在呼叫lm的coefficient的地方，呼叫line[i]是okay的。
呼叫coefficient後，會return NULL。
[程式範例]:
https://ideone.com/LfFEzU
test <- function() {
vec1 <- c(1,2,3)
vec2 <- c(4,5,6)
line <- list()
for (i in 1:2) {
line$i <- lm(vec2 ~ vec1)
names(line)[i] <- paste0("reg", i)
}
# return(line)
coef <- list()
for (i in 1:2) {
coef$i <- line[i]$coefficient[[1]]
return(coef$i) # <