在r中的最后一个图案的最后一次出现之后，删除字符串中的所有字符

Question

我想在字符串中的特定模式的最后一个特定模式之后删除所有

。

字符 代码>

我想在模式的最后一次出现之后删除所有内容“ ge” < /code>，最终以：

“ asdsads dfdsfd＆gt; x 442 /＆lt; sdasvre（geqwe）ge ge ge ge ge ge ge ge ge ge''。

Answer 1

您可以使用捕获组在最后一个“ GE”（^（。*GE））之前捕获所有字符串，并将整个内容替换为该捕获组（\\ 1 ）。

sub('^(.*ge).+
, '\\1', string)
[1] "asdsads dfdsfd>x 442 /<sdasvre (geqwe) ge ge ge"

Answer 2

您可以在这里使用负面的lookahead：

string <- "asdsads dfdsfd>x 442 /<sdasvre (geqwe) ge ge ge regthyty "
output <- sub("\\bge (?!.*\\bge\\b).*", "ge", string, perl=TRUE)
output

[1] "asdsads dfdsfd>x 442 /<sdasvre (geqwe) ge ge ge"