如何在R中使用regex查找不带逗号的subtext？

Question

我有一个数据框如下所示：

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

如果我想检查'(R)‘是否出现在'antibiotics1’之后，我应该怎么做？

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

给出

[1] 1 2

而我想要的结果是

[1] 1

Answer 1

试试这个：

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

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

在第二种情况下，如果不首先使用至少一个左括号，则不可能进行此匹配，因此只有第一个匹配。