从R中的多个列表中提取一个列表元素

Question

我正在使用以下循环以适应多个模型：

lambda = seq(from=0,to=10.2,by=0.2)
   for(i in lambda){
       assign(paste("fitb",i, sep=""), 
              lmmlasso(y = mydata.B$Bloodpress, 
                       x = x.matrix, z = z, grp = grp1,
                       lambda = i, pdMat = "pdIdent"))
}   

所以我最终在名为 fitb0、fitb0.2 等的列表中找到了很多适合的模型

我需要从每个列表中提取 AIC 值并将其放在一个向量中，而不是使用如下代码：

AIC=c(fitb0$aic, fitb0.2$aic ... fitb10$aic)

我能做什么？

Answer 1

也许抓住循环内的 aic？

lambda = seq(from=0,to=10.2,by=0.2)
i=1 ; aic=NA
   for(i in lambda){

              wholelassoresults=lmmlasso(y = mydata.B$Bloodpress, 
                       x = x.matrix, z = z, grp = grp1,
                        lambda = i, pdMat = "pdIdent"))
                       assign(paste("fitb",i, sep=""),wholelassoresults)   
                       aic[i]=wholelassoresults$aic

}