在R语言中匹配数据框两列与二元向量并返回对应ID

嘿，刚看到你的第一个Stack Overflow问题，这有几种简单直接的方法能帮你找到匹配的ID，一起来看看：

方法1：基础R实现（无需额外包） #

先把你的初始数据定义好，然后用逻辑条件筛选匹配的行，再提取对应的ID；如果没有匹配项，就返回NA：

# 初始化你的数据
data.frame1 <- data.frame("ID" = c(1,2,3,4,5), "Col1" = c(1,4,12,15,6), "Col2"= c(3,6,2,4,1))
Value1 <- 4
Value2 <- 6

# 筛选匹配(Col1=Value1, Col2=Value2)的ID，无匹配则返回NA
matched_id <- data.frame1$ID[data.frame1$Col1 == Value1 & data.frame1$Col2 == Value2]
final_result <- ifelse(length(matched_id) == 0, NA, matched_id)

# 输出结果
final_result
# [1] 2

如果需要对每一行都返回对应结果（匹配行返回ID，不匹配返回NA），可以用ifelse函数生成和数据框行数一致的向量：

rowwise_result <- ifelse(data.frame1$Col1 == Value1 & data.frame1$Col2 == Value2, data.frame1$ID, NA)
rowwise_result
# [1] NA  2 NA NA NA

方法2：用dplyr包实现（更直观的管道语法） #

如果你习惯用tidyverse系列工具，dplyr的管道写法会更易读：

library(dplyr)

# 筛选匹配行并提取ID，无匹配则返回NA
dplyr_result <- data.frame1 %>%
  filter(Col1 == Value1, Col2 == Value2) %>%
  pull(ID) %>%
  {if (length(.) == 0) NA else .}

dplyr_result
# [1] 2

两种方法都能满足你的需求，基础R方法适合不想加载额外包的场景，dplyr的写法更简洁易懂，看你个人习惯选择就好~

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