数据清洗：将相似字段聚合在一个[重复]

Question

如何按常见模式对变量的元素进行分组。例如，我有一个数据库，其中有一个名为 company role 的字段，我希望能够将常见的角色归为一个。

employee <- c("a", "b", "c", "d", "e")
Rol      <- c(" accounting assistant", "accou assist", "account.assistant", 
              "healt aux", "auxiliary in healt")
DF <- data.frame(employee, Rol)

我想把它变成这样的东西

Employeee	ROL
A	accounting assistant
B	accounting assistant
C	accounting assistant
D	Healt auxiliary
E	Healt auxiliary

目前我正在手动识别模式，但随着数据的增长，任务变得更加复杂，我将不胜感激。谢谢！

Answer 1

library(dplyr)
# your dataframe
employee <- c("a", "b", "c", "d", "e")
Rol      <- c(" accounting assistant", "accou assist", "account.assistant", 
              "healt aux", "auxiliary in healt")
DF <- data.frame(employee, Rol)

# save the terms you want to unify in vectors
vector_accounting <- c(" accounting assistant", "accou assist", "account.assistant")
vector_healt <- c("healt aux", "auxiliary in healt")

# apply changes with %in%
DF1 <- DF %>% 
  mutate(Rol = case_when(Rol %in% vector_accounting ~ "accounting assistent",
                         Rol %in% vector_healt ~ "Heat auxiliary"))