Rで線形モデルのリストを作成するには？

Question

は、私はこれは私が書いたコードがある

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

Rに線形モデルの名前付きリストを作成する必要があります。実際にはリストを作成するが、明らかにそれは呼び出し可能なオブジェクトではないリストのリストである（すなわち、メソッドの予測がリストの要素に対して機能しない）。

リストの要素を実際のオブジェクトとして使用するにはどうすればよいですか？

Answer 1

あなたはlapplyであなたのモデルのリストを作成できます。そして、リスト要素にpredictを呼び出す

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

をして

names(models) <- tagnames 

に名前を割り当てる：

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 
}