r - 替换整洁表中的值

Question

我有一张带有计数数据的表：我试图用一个来删除所有非零值。

这是我尝试过的：

div.summary<- raw.data %>% select (Site, 5:55) %>% 
  group_by(Site) %>% summarise_all(sum) %>%  mutate_if(replace(2:52, >0, 1))

标签： rtidyversetidyrdplyr

Answer 1

尝试：

div.summary<- raw.data %>% 
  select (Site, 5:55) %>% 
  group_by(Site) %>% 
  summarise_all(sum) %>%  
  mutate_at(vars(2:52),
            funs(if_else(. == 0, 1, .)))