R语言如何按照列名命名规则批量选取符合要求的数据集列？

方案1：批量生成目标列名（最简便，推荐优先使用） #

由于你需要提取的列后缀为连续的1到65整数，可以直接通过字符串拼接批量生成列名，无需手动输入：

基础R写法 #

# 生成所有目标列名
target_cols <- paste0("ABC_XYZ_", 1:65)
# 提取对应列
df_selected <- df[, target_cols]

如果担心部分列不存在导致报错，可以增加校验逻辑，仅保留数据集中实际存在的列：

target_cols <- intersect(paste0("ABC_XYZ_", 1:65), colnames(df))
df_selected <- df[, target_cols]

tidyverse（dplyr）写法 #

library(dplyr)
df_selected <- df %>% select(all_of(paste0("ABC_XYZ_", 1:65)))

方案2：正则匹配筛选（适合列序号不连续、需要精准匹配规则的场景） #

通过正则表达式匹配「前缀为ABC_XYZ_、后缀为1-65整数」的列，自动排除ABC_XYZ_DT、ABC_XYZ_BY这类带字母后缀的不符合规则的列：

基础R写法 #

# 匹配符合规则的列名
target_cols <- grep("^ABC_XYZ_([1-9]|[1-5][0-9]|6[0-5])$", colnames(df), value = TRUE)
# 提取对应列
df_selected <- df[, target_cols]

tidyverse（dplyr）写法 #

library(dplyr)
df_selected <- df %>% select(matches("^ABC_XYZ_([1-9]|[1-5][0-9]|6[0-5])$"))

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