regex - R，第n次出现之前的所有内容的正则表达式

Question

s <- "1-343-43Hello_2_323.14_fdh-99H"

在R中，我想使用正则表达式在下划线(例如2nd)之前获取子字符串。如何用一个正则表达式来完成呢？另一种方法是用“_”分隔，然后粘贴前两个-沿某个方向移动；

paste(sapply(strsplit(s, "_"),"[", 1:2), collapse = "_")

给出:

[1] "1-343-43Hello_2"

但是，我怎样才能使正则表达式表达出同样的效果呢？

Answer 1

您可以使用sub:

sub("^([^_]*_[^_]*).*", "\\1", s)

见 regex demo

R code demo:

s <- "1-343-43Hello_2_323.14_fdh-99H"
sub("^([^_]*_[^_]*).*", "\\1", s)
## => [1] "1-343-43Hello_2"

模式详细信息:

^-字符串

的开始

([^_]*_[^_]*)-组1捕获除_之外的0+个字符，然后捕获一个_，再捕获0+个非_的

.*-字符串的其余部分(请注意，TRE正则表达式.也匹配换行符)。

\\1替换仅返回组1中的值。