如何从R中的列表中过滤掉原子向量？

Question

我有一个非常大的列表，该列表的每个组成部分。我需要获取名为 cv 的变量的被调用值。它适用于其他列表，但在某些列表中我遇到错误：

Error in x$cvm : $ operator is invalid for atomic vectors

如何在运行代码之前从列表中过滤掉这些向量？

这是我的代码的作用：

MES<-lapply(mylist, function(x) x$cvm[x$lambda == x$lambda.min])

它运作良好，但在某些列表中，它会产生已经提到的错误。

Answer 1

$ 是有效的，例如对于列表（和环境，但可能不是你的情况）。要过滤掉所有不是列表的元素，请调用：

mylist2 <- mylist[sapply(mylist, is.list)]