dplyr: как (сжато) использовать мутате условно для разных случаев?

Question

Рассмотрим следующий пример

data <- data_frame(name = c('A','B','C','C',NA,'D')) 

> data 
# A tibble: 6 × 1 
    name 
    <chr> 
1  A 
2  B 
3  C 
4  C 
5 <NA> 
6  D 

Вот, я знаю, что переменная name фактически отображает на 'A' -> 'one' и 'B' -> 'two'. Я просто хотел бы создать переменную, которая получает значение отображения. Конечно, в моем исходном наборе данных у меня есть еще много случаев для сопоставления.

Что-то, что не Работа следующая.

data <- data %>% 
    mutate(mapping = ifelse(name == 'A', 'one', name), 
     mapping = ifelse(name == 'B', 'two', name)) 
> data 
# A tibble: 6 × 2 
    name mapping 
    <chr> <chr> 
1  A  A 
2  B  two 
3  C  C 
4  C  C 
5 <NA> <NA> 
6  D  D 

Что здесь не так? Каков наиболее эффективный способ сделать это в dplyr?

Большое спасибо!

Answer 1

Если вы хотите избежать вложенных ifelse, вы должны просто создать фрейм данных отображения и внутреннее соединение с ним.

mapping_df <- data.frame(name = c('A', 'B', 'C' . . . . 'Z'), mapping = c(1:26)) 

left_join(data, mapping_df, by = "name") 

Answer 2

Для двух значений вы могли бы попробовать что-то вроде:

data <- data %>% 
    mutate(mapping = ifelse(name == 'A', 'one', 
    ifelse(name == 'B', 'two', 'other'))) 

Однако вы бы лучше создать отдельный кадр данных, содержащий карту, а затем с помощью dplyr :: left_join(), чтобы добавить его к вашему основному df.

Answer 3

data %>% mutate(mapping = recode(name, A="one", B="two")) 

Recode может пригодиться при отсутствии замены.