有条件地删除不是NA的行

Question

我需要删除最后两列中没有NA值的行。有什么想法吗？

# A tibble: 640 x 4
   `7 (very included)` `7 (very included)__1` X__1              X__2             
   <chr>               <chr>                  <chr>             <chr>            
 1 NA                  NA                     NA                NA               
 2 7 (very included)   5                      NA                NA               
 3 NA                  NA                     NA                NA               
 4 7 (very included)   7 (very included)      7 (very included) 7 (very included)
 5 NA                  NA                     NA                NA               
 6 NA                  NA                     NA                NA               
 7 NA                  NA                     NA                NA               
 8 5                   4                      NA                NA               
 9 NA                  NA                     NA                NA               
10 7 (very included)   7 (very included)      7 (very included) NA               
# ... with 630 more rows

Answer 1

假设您的数据框对象为df，则可以进行以下过滤：

library(dplyr)
df %>%
    filter(!is.na(`X__1`) & !is.na(`X__2`))

或

df[!is.na(df$`X__1`) & !is.na(df$`X__2`), ]