regex - Removing string parts between substrings when substrings occur multiple times in R

Question

In a string

string="aaaaaaaaaSTARTbbbbbbbbbbSTOPccccccccSTARTddddddddddSTOPeeeeeee"

I would like to remove all parts that occur between START and STOP, yielding

"aaaaaaaaacccccccceeeeeee"

if I try with gsub("START(.*)STOP","",string) this gives me "aaaaaaaaaeeeeeee" though.

What would be the correct way to do this, allowing for multiple occurrences of START and STOP?

Answer 1

在里面也加一个?。

gsub("START.*?STOP", "", string)
# [1] "aaaaaaaaacccccccceeeeeee"

Answer 2

不像阿南达的回答那么优雅，但是还有其他一些使用 stringr 和 plyr 包的方法。

library(stringr)
library(plyr)

start <- ldply(str_locate_all(string, 'START'))[1, 1]
end <- ldply(str_locate_all(string, 'STOP'))
end <- end[nrow(end), 2]
expression <- str_sub(string, start, end)
str_replace(string, expression, '')