根据条件删除所选列表

Question

我有一个很大的清单，太大了，不能放在这里，但我正在努力制作可再现的输出。

列表的尺寸如下：

> dim(mylist[[70]])
[1] 618   3
> dim(mylist[[71]])
NULL
> dim(mylist[[72]])
[1] 792   3
> dim(mylist[[73]])
[1] 831   3
> dim(mylist[[74]])
[1] 550   3

该列表是数据帧的大列表。但是，某些数据帧无法正确创建。我正在尝试做的是消除尺寸为NULL的数据帧列表。数据帧列表的屏幕快照在这里。

如果您能想到删除这些数据帧的更好方法，那么我也对此持开放态度。我考虑过删除所有Type == Logical

的列表

Answer 1

一种选择是检查它是否为data.frame（is.data.frame），如果为TRUE，则检查Filter中的行数是否大于0

Filter(function(x) is.data.frame(x) && nrow(x) > 0, mylist)