根据r中的条件删除/过滤行

Question

我想删除在EXP_MAN列中得分为2，在ethnity_rescuer中得分为1的参与者。

我使用了下面的代码，它工作了。

mydata <- mydata %>% 
mutate(to_exclude = 
case_when(EXP_MAN == 2 & 
(Ethnicity_Rescuer ==1) ~ 1)) %>%
mutate(to_exclude = replace(to_exclude, is.na(to_exclude), 0))
mydata <- mydata %>% filter(to_exclude == 0)

然而，这段代码看起来很复杂，我相信应该有一个更简单的解决方案。

我试图用下面的代码过滤掉参与者，但它不起作用。只是想知道在这种情况下删除参与者最简单的代码是什么。

mydata <- mydata %>% filter(EXP_MAN != 2 & Ethnicity_Rescuer !=1)

Answer 1

您可以使用子集函数来选择数据集和一个/几个条件

subset(mydata,EXP_MAN != 2 & Ethnicity_Rescuer !=1)