R语言中为前缀含pol的变量批量设置标签的方法问询

你的代码问题在于：用select(matches("pol"))会丢弃非pol前缀的列，且set_variable_labels的语法使用错误，导致标签设置失败。以下是两种可行的批量设置标签的方法，均保留原数据的所有列：

方法一：提取目标变量名批量设置（推荐） #

先加载所需包，提取所有以pol开头的变量名，再批量赋值标签：

library(dplyr)
library(labelled)

# 获取所有前缀为"pol"的变量名
pol_vars <- grep("^pol", names(cp14), value = TRUE)

# 批量设置标签
cp14 <- cp14 %>%
  set_variable_labels(!!!set_names(rep("Interest in politics", length(pol_vars)), pol_vars))

方法二：用across批量处理（tidyverse风格） #

利用dplyr::across对匹配的列统一设置标签：

library(dplyr)
library(labelled)

cp14 <- cp14 %>%
  mutate(across(starts_with("pol"), ~set_variable_labels(.x, label = "Interest in politics")))

验证标签是否设置成功 #

运行以下代码查看目标变量的标签：

# 查看所有变量标签
var_label(cp14)

# 仅查看pol前缀变量的标签
var_label(cp14[, pol_vars])

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