相关疑难解决方法(0)

我常常遇到需要为不同变量创建大量类似模型的情况.通常我将它们转储到列表中.以下是虚拟代码的示例:

modlist <- lapply(1:10,function(l) {
   data <- data.frame(Y=rnorm(10),X=rnorm(10))
   lm(Y~.,data=data)
})

现在,以实例为例非常简单:

lapply(modlist,predict)

我有时想做的是从列表中提取一个元素.显而易见的方法是

sapply(modlist,function(l)l$rank)

这样做我想要的,但我想知道是否有更短的方法来获得相同的结果？