如何在 R 中使用正则表达式查找不带逗号的潜文本？

Posted 2023-04-14

【中文标题】如何在 R 中使用正则表达式查找不带逗号的潜文本？

【英文标题】：How do I find a subtext without comma using regex in R?

【发布时间】：2017-03-07 06:37:19

【问题描述】：

我有一个数据框：

result <- c('Ab1 : 256 ug/mL(R), Ab2(disk); 18mm(S)', 'Ab1 : 4 ug/mL(S), Ab2(disk); <2mm(R)')
df <- data.frame(result)

如果我想检查 'antibiotics1' 后面是否出现 '(R)' 怎么办？

grep("Ab1[[:print:]]*\\(R\\)", result)

给予

[1] 1 2

而我想要的结果是

[1] 1

【参考方案1】：

试试这个：

grep("Ab1[^(]*?\\(R\\)", result)
[1] 1

Ab1      match 'Ab1' literally
[^(]*?   match anything besides an opening parenthesis, non greedily
(R)      match '(R)' literally

在第二种情况下，如果不先消耗至少一个左括号，就不可能进行这种匹配，因此只有第一个匹配。

【讨论】：

也许我们可以将正则表达式进一步简化为grep("Ab1[^(]*\\(R\\)", result)

谢谢。它确实可以确定“（R）”是否在“Ab1”之后