for循环中线性模型的唯一响应变量

Question

我有一个循环来使用相同的预测变量集为不同的响应创建线性模型

for(i in resp){
  y=data[,i]
  df=data.frame(y, modelpredictors) #this creates a temporary data frame for you 
  name=paste("MODEL", nameIndex, sep=".") #Create unique model names
  model=lm(y~.,data=df)

  assign(name, model)
  nameIndex=nameIndex+1

}

稍后在我的代码中，我使用了一个函数（我正在循环的dredge（）），需要调用响应向量，在这种情况下为＃34; y＆＃34;，为每个模型。

我需要每个模型都有一个独特的响应＆＃34; name＆＃34;所以我可以调用正确的向量。

Answer 1

如果您要为不同的＆＃39; y创建不同的模型。变量，您应该只编辑第四行：

name=paste('model',i,sep='.')

然后您可以使用＆＃39; get（）＆＃39;循环并调用每个模型。像：

for( i in resp){

    model_name<-paste('model',i,sep=',')
    model<-get(model_name)

}