удалить data.frames в списке заполняется только значениями NA

Question

У меня есть список data.frames, и некоторые из них заполнены NA, я хотел бы удалить эти data.frames с только NA в моем списке.

Я использую эти две команды:

list.df <- lapply(list.df, na.omit) 
list.df <- list.df[sapply(list.df, function(x) dim(x)[1] >0)] 

Есть ли способ сделать то же самое, но в одной строке?

Благодаря

Answer 1

Это сохраняет все data.frame S, которые имеют по крайней мере один NA -бесплатно ряд:

df.list[ sapply(df.list, function(x){ any(rowSums(is.na(x)) == 0) }) ]