Ich möchte die Zeilen aus einer data.table entfernen, die nur NAs enthalten.

> tab = data.table(A = c(1, NA, 3), B = c(NA, NA, 3))
> tab
    A  B
1:  1 NA
2: NA NA
3:  3  3

Normalerweise würde ich es mit @ tapply(dat, 1, ...) was leider nicht auf einer data.table funktioniert, aber es führt mich zu dieser uneleganten Lösung:

> tab[apply(as.data.frame(tab), 1, function(x) !all(is.na(x))), ]
   A  B
1: 1 NA
2: 3  3

Wie kann dies am schnellsten erreicht werden, ohne die Spaltennamen zu kennen?