R case_when和%(%)

Question

这条case_when语句到底做错了什么？

我有一个包含总统选举数据的数据框架。我正在尝试为锈带州创建一个新的变量，如果它们属于这六个州之一-俄亥俄州，密歇根州等。我想用1标记锈带州，用0标记其他州。:(

pres2016 <- pres2016 %>%
  mutate(rust_belt = case_when(state %in% c("OH", "MI", "PA", "WI","IN", "IL") ~ 1, !(state %in% c("OH", "MI", "PA", "WI","IN", "IL") ~ 0)))

我似乎得到了1的值，但是然后一直往下，0根本不能捕捉到

Answer 1

实际上你可以在这里使用ifelse：

pres2016$rust_belt <- ifelse(pres2016$state %in% c("OH", "MI", "PA", "WI","IN", "IL"), 1, 0)

如果您真的想在这里使用case_when，那么只需使用TRUE ~ ...提供一个默认选项

pres2016 <- pres2016 %>%
    mutate(rust_belt = case_when(state %in% c("OH", "MI", "PA", "WI","IN", "IL") ~ 1,
                                 TRUE ~ 0))