Как создать список линейных моделей в R?

Question

мне нужно создать именованный список линейных моделей в R.

models=list() 
for (tag in tagnames){ 
    expr=paste0(tag," ~ .") 
    f=formula(expr) 
    models[tag]=lm(f,df) 
} 

Это код, который я написал; он фактически создает список, но, по-видимому, это список списков, которые не являются вызываемыми объектами (т. е. метод предсказания не работает над элементами списка).

Как я могу сделать элемент списков пригодным для использования в качестве реальных объектов lm?

Answer 1

Вы можете создать список ваших моделей с lapply:

models <- lapply(tagnames, function(x) lm(formula(paste0(x, " ~ .")), df)) 

и присвоить имена с

names(models) <- tagnames 

Затем вызовите predict на элементе списка:

predict(models[["name"]]) 

Answer 2

Вы может это:

models[[tag]]=lm(f,df) 


models=list() 
tagnames <- names(cars) 
for (tag in tagnames){ 
    expr=paste0(tag," ~ .") 
    f=formula(expr) 
    fit <- lm(f, data = cars) 
    models[[tag]]=fit 
}