Regex 提取字符串的一部分

我有一个表达式为

FR97\u 6393\u COROG436790

。我需要删除第二个下划线之后的所有内容，这样它将是

FR97\u 6393

我已尝试为此（

“FR（[0-9]+）([0-9]+）.*”

）创建

gsub

模式，但失败

你能帮我找出正确的模式吗？

我会使用sub

sub("_[^_]*$", "", x)

---

这将删除最后一个带下划线的部分。

我们可以尝试使用

sub

sub("^([^_]+_[^_]+).*", "\\1", str1)
#[1] "FR97_6393"

数据

str1
str1 <- "FR97_6393_COROG436790"