仅当整个 df r 中不存在时才从变量中删除 0

Question

我有以下测试 df :

df1 <- data.frame(site = c('1' , '1' , '1' , '1' , '2' , '2' , 
                           '2' , '2' , '3' , '3' , '3' , '3') , 
                  species = c('A' , 'B' , 'C' , 'D' , 'A' , 'B' , 
                              'C' , 'D' , 'A' , 'B' , 'C' , 'D') , 
                  value = c('1' , '0' , '0' , '4' , '0' , '0' , 
                            '3' , '4' , '0' , '0' , '0' , '1')) 

只有当每个站点的值都为 0 时，我才需要过滤掉物种。如果物种和 0 在至少一个站点中至少有一个值 >= 1，我需要留下它们。

首选tidyverse方法。

Answer 1

你可以试试这个(根据 benson23 的建议)

library(dplyr)

df1 %>% 
  group_by(species) %>% 
  filter(!all(value == "0"))
# A tibble: 9 × 3
# Groups:   species [3]
  site  species value
  <chr> <chr>   <chr>
1 1     A       1    
2 1     C       0    
3 1     D       4    
4 2     A       0    
5 2     C       3    
6 2     D       4    
7 3     A       0    
8 3     C       0    
9 3     D       1