如何基于多条件从含分隔符的R数据框中提取对应Ge值？

针对你的需求，核心问题在于Ip和Ge的多值对应关系无法用单一行级的mutate/ifelse处理，正确的思路是先拆分多值行、筛选符合条件的记录，再合并回原始行结构。以下是基于tidyverse的完整解决方案：

1. 构造示例数据（模拟你的Data_test结构） #

library(tidyverse)

Data_test <- tibble(
  Id = c(1, 2),
  Ip = c("Echo;Abri;Abri", "Abri;Echo"),
  Ge = c("G1;G2;G3", "G4;G5"),
  Ca = c(7, 10),
  Mp = c(9, 7)
)

2. 拆分多值变量，建立一一对应关系 #

用separate_rows函数将分号分隔的Ip和Ge拆分为独立行，同时保留其他变量的对应值：

processed_df <- Data_test %>%
  separate_rows(Ip, Ge, sep = ";")

3. 筛选符合条件的Ge记录 #

按照你的两个规则筛选行：

filtered_ge <- processed_df %>%
  filter(
    # 规则1：提取所有与Echo对应的Ge
    Ip == "Echo" | 
    # 规则2：提取满足Ca>9或Mp>8的Abri对应的Ge
    (Ip == "Abri" & (Ca > 9 | Mp > 8))
  )

4. 合并回原始行结构，生成新变量 #

将同一原始行的符合条件的Ge值重新合并为分号分隔的字符串，关联回原数据：

final_result <- Data_test %>%
  left_join(
    filtered_ge %>%
      group_by(Id) %>%
      summarise(New_Ge = str_c(Ge, collapse = ";")),
    by = "Id"
  )

结果说明 #

运行上述代码后，final_result中的New_Ge列就是你需要的提取结果：

• 对于Id=1，符合条件的是Echo对应的G1，以及Mp>8的Abri对应的G3，所以New_Ge为G1;G3
• 对于Id=2，符合条件的是Ca>9的Abri对应的G4，以及Echo对应的G5，所以New_Ge为G4;G5

这个方法的核心是先拆分多值变量，把一对多的关系转化为一对一，再用常规筛选逻辑处理，最后合并回原始结构，完美解决多值对应场景下的提取需求。

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