如何将haven_labelled数据转换为R中可用于线性回归等的格式？

先修正你遇到的代码错误 #

你之前的代码报错是因为col_names对象未定义，要让代码生效，要么手动指定列名，要么先把目标列名存入变量：

# 方式1：手动指定列名
data2 <- data %>%
  mutate(across(c("sgnptit", "其他需要转换的列名"), as.factor))

# 方式2：先定义列名变量再使用
col_names <- c("sgnptit", "其他需要转换的列名")
data2 <- data %>%
  mutate(across(all_of(col_names), as.factor))

不过直接用as.factor处理haven_labelled变量，不会自动把标签映射为因子水平，更推荐用haven包自带的工具函数。

批量转换haven_labelled列的实用方法 #

方法1：转成带标签的因子（适合分类变量） #

用haven包的as_factor()可以直接将haven_labelled类型转为R原生因子，且自动把原标签设为因子水平：

library(haven)
library(dplyr)

# 转换所有haven_labelled类型的列
data_clean <- data %>%
  mutate(across(where(is.labelled), as_factor))

# 只转换指定列
data_clean <- data %>%
  mutate(across(c("sgnptit", "col2"), as_factor))

方法2：转成普通数值（适合有序/连续型变量） #

如果你的labelled变量是数值类（比如Likert量表、连续打分），不需要转成因子，直接转为普通数值即可：

data_clean <- data %>%
  mutate(across(where(is.labelled), as.numeric))

方法3：一键移除标签保留原始数值 #

如果只需要去掉haven的标签属性，保留原始数值，用zap_labels()：

data_clean <- data %>%
  mutate(across(where(is.labelled), zap_labels))

验证转换效果 #

转换后可以用以下命令确认结果：

# 查看列类型
class(data_clean$sgnptit)
# 测试table命令是否正常工作
table(data_clean$sgnptit)

适配分析场景的说明 #

• 线性回归：分类变量转成因子后，R会自动生成哑变量；数值型变量直接用转后的数值即可纳入模型。
• 散点图：数值型变量直接使用，因子型变量会自动作为分组维度展示。

内容的提问来源于stack exchange，提问作者AC_657