Удалить строки в матрице R, где все данные - Н / Д [дубликат]

Возможный дубликат:
Удаление пустых строк файла данных в R

Как мне удалить строки из матрицы или фрейма данных, где все элементы в строке являются NA?

Итак, чтобы получить от этого:

     [,1] [,2] [,3]
[1,]    1    6   11
[2,]   NA   NA   NA
[3,]    3    8   13
[4,]    4   NA   NA
[5,]    5   10   NA

к этому:

     [,1] [,2] [,3]
[1,]    1    6   11
[2,]    3    8   13
[3,]    4   NA   NA
[4,]    5   10   NA

Поскольку проблема с na.omit заключается в том, что он удаляет строки с любыми NA, и поэтому я получил бы следующее:

     [,1] [,2] [,3]
[1,]    1    6   11
[2,]    3    8   13

Лучшее, что мне удалось сделать, это использовать функцию apply ():

> x[apply(x, 1, function(y) !all(is.na(y))),]
     [,1] [,2] [,3]
[1,]    1    6   11
[2,]    3    8   13
[3,]    4   NA   NA
[4,]    5   10   NA

, но это кажется довольно запутанным (есть ли что-то более простое, чего мне не хватает?) ....

Спасибо.