R语言如何筛选列名以指定后缀模式结尾的矩阵列

你可以根据自身使用习惯，选择基础R无依赖实现或tidyverse生态实现，完成列名以G_s1_6结尾的列筛选：

• 基础R实现（无第三方包依赖，优先推荐）
  你给出的示例列名存在尾部带多余空格的情况，建议先清洗列名首尾空白避免匹配失效，再做筛选：

  # 将mat替换为你自己的矩阵变量名
  # 清洗列名首尾多余的空格、制表符等空白字符
  colnames(mat) <- trimws(colnames(mat))
  # 筛选目标列，drop=FALSE保证仅匹配到单列时仍保持矩阵格式，不会被自动转为向量
  res_mat <- mat[, endsWith(colnames(mat), "G_s1_6"), drop = FALSE]
  

  如果不想修改原矩阵的列名，也可以直接用正则表达式兼容尾部可能存在的空白，通过grepl()做字符串尾匹配：

  # 正则中$代表字符串结尾位置，\\s*匹配结尾处0到多个空白字符
  res_mat <- mat[, grepl("G_s1_6\\s*$", colnames(mat)), drop = FALSE]
  

• dplyr实现（适配tidyverse工作流）
  如果你日常用tidyverse生态处理数据，可以用dplyr内置的后缀选择器快速完成选列：

  library(dplyr)
  colnames(mat) <- trimws(colnames(mat))
  res_mat <- mat |> 
    select(ends_with("G_s1_6")) |> 
    as.matrix() # 需要保留矩阵结构时添加，仅处理数据框可省略
  

踩坑提示：如果筛选结果为空，优先检查列名是否存在不可见的首尾空白、大小写不一致问题，这是列名匹配失败最常见的诱因。

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