如何重新排列R中的单个单元格？

library(dplyr)

# 创建一个包含单元格数据的数据框
df <- data.frame(cell = c("A", "B", "C", "D"))

# 使用mutate()函数和case_when()函数重新排列单元格
df <- df %>%
  mutate(cell = case_when(
    cell == "A" ~ "D",
    cell == "B" ~ "C",
    cell == "C" ~ "B",
    cell == "D" ~ "A"
  ))

# 输出重新排列后的结果
print(df)