R:用(‘)重命名列中的值

install.packages("dplyr")

library(dplyr)

df <- df %>%
  mutate(column_name = case_when(
    column_name == "old_value1" ~ "new_value1",
    column_name == "old_value2" ~ "new_value2",
    column_name == "old_value3" ~ "new_value3",
    TRUE ~ column_name
  ))

df <- df %>%
  mutate(column1 = case_when(
    column1 == "old_value1" ~ "new_value1",
    column1 == "old_value2" ~ "new_value2",
    column1 == "old_value3" ~ "new_value3",
    TRUE ~ column1
  ),
  column2 = case_when(
    column2 == "old_value4" ~ "new_value4",
    column2 == "old_value5" ~ "new_value5",
    column2 == "old_value6" ~ "new_value6",
    TRUE ~ column2
  ))