如何在R语言矩阵中按指定多个符号提取对应整行元素？

先把你的示例数据转换成R可识别的矩阵对象：

# 创建示例矩阵
mat <- matrix(
  data = c("c", "cat", "pet",
           "d", "dog", "first aid",
           "b", "bird", "song",
           "m", "monkey", "forest"),
  nrow = 4,
  ncol = 3,
  byrow = TRUE,
  dimnames = list(NULL, c("SYMBOL", "NAME", "FUNCTION"))
)

# 定义要匹配的SYMBOL向量
target_symbols <- c("c", "d")

给你两种高效的批量提取方法：

方法1：用%in%直接筛选（最常用） #

直接通过逻辑判断切片矩阵，一步到位：

result <- mat[mat[, "SYMBOL"] %in% target_symbols, ]

运行后result就是你要的结果：

SYMBOL NAME FUNCTION
[1,] "c"    "cat" "pet"   
[2,] "d"    "dog" "first aid"

方法2：用match获取行索引 #

如果需要按target_symbols的顺序提取，或者要先拿到行号，可以用这个方法：

# 获取每个目标SYMBOL对应的行索引
match_rows <- match(target_symbols, mat[, "SYMBOL"])
# 提取对应行（若有不匹配的SYMBOL，match会返回NA，可加na.omit过滤）
result <- mat[match_rows, ]

这两种方法都能替代逐个用which的繁琐操作，一次性完成批量匹配提取。

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