r - 如何使用 R 中的条件删除 NA？

Question

我想删除一些符合条件的行。这是我的数据:

df_A <- tribble(
  ~product_name,   ~id,  ~clicks,
        "A",        NA,      1,  
        "A",         4,      1, 
        "A",         3,      1, 
        "B",        NA,      NA, 
        "B",         6,      2, 
        "C",        NA,      3, 
        "C",         5,      NA, 
)

例如，我想删除第一行和第六行，因为 product_name 中的产品 A 和 C 已经具有 id 列中的值。但我想保留第四行，因为我的条件是如果所有行(product_name 除外)都是 NA，它应该保留在数据中。

这是我想要的数据:

df_A <- tribble(
  ~product_name,   ~id,  ~clicks,
       "A",          4,      1, 
       "A",          3,      1, 
       "B",         NA,      NA, 
       "B",          6,      2, 
       "C",          5,      NA, 
)

Answer 1

您可以根据您的条件创建一个虚拟列并对其进行过滤

df_A %>%
  mutate(
    not_remove = case_when(
      is.na(id) & is.na(clicks) ~ TRUE,
      is.na(id) ~ FALSE,
      TRUE ~ TRUE
    )
  ) %>%
  filter(not_remove) %>%
  select(
    -not_remove
  )