如何更优雅地通过函数操作因子标签？避免字符串与因子互转

DevOps 小满

2026-7-18

优雅调整因子标签的方法（无需字符串与因子来回转换）

方法一：直接修改因子的`levels`属性

因子的levels属性可以直接修改，无需转换数据类型。在dplyr::mutate()中通过代码块直接操作即可：

library(dplyr)

# 初始化数据
my_data <- data.frame(my_f = LETTERS[1:5], stringsAsFactors = TRUE)

# 修改因子水平
my_data <- my_data |>
  mutate(my_f = {
    levels(my_f) <- paste("Constant part", levels(my_f))
    my_f
  })

# 查看结果
str(my_data)

这种方式直接在原因子对象上更新水平标签，全程保持因子类型，没有额外的类型转换开销。

方法二：使用`forcats`包的`fct_relabel()`函数

forcats是tidyverse生态中专门处理因子的工具包，fct_relabel()可以对每个因子水平应用自定义转换函数，返回结果仍为因子，代码更简洁可读：

library(dplyr)
library(forcats)

# 初始化数据
my_data <- data.frame(my_f = LETTERS[1:5], stringsAsFactors = TRUE)

# 重命名因子水平
my_data <- my_data |>
  mutate(my_f = fct_relabel(my_f, ~ paste("Constant part", .x)))

# 查看结果
str(my_data)

这里的~ paste("Constant part", .x)是匿名函数，.x代表每个因子水平，函数会自动遍历所有水平完成前缀添加操作。