удаление выбранных списков на основе условия

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

list - это большой список фреймов данных.Однако некоторые кадры данных не были созданы правильно.То, что я пытаюсь сделать, - это исключить список фреймов данных, которые имеют NULL в качестве своих измерений.Снимок экрана со списком фреймов данных здесь.

Если вы можете придумать лучший способ удалить эти фреймы данных, я открытк этому также.Я думал об удалении всех списков, чьи Type == Logical

Answer 1

Один из вариантов - проверить, является ли это data.frame (is.data.frame), и если это ИСТИНА, то проверить, чтобы число строк было больше 0 в Filter

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