我試圖找到一種簡單的方法來提取出現(xiàn)在兩個(gè)已知子字符串之間的未知子字符串（可能是任何東西）。例如，我有一個(gè)字符串：a<-" anything goes here, STR1 GET_ME STR2, anything goes here"我需要提取GET_MESTR1和STR2之間的字符串（不帶空格）。我正在嘗試str_extract(a, "STR1 (.+) STR2")，但是我正在全場比賽[1] "STR1 GET_ME STR2"我當(dāng)然可以剝離已知字符串，以隔離所需的子字符串，但是我認(rèn)為應(yīng)該有一種更干凈的方法，即使用正確的正則表達(dá)式來實(shí)現(xiàn)。正則表達(dá)式 [R stringr
3 回答
肥皂起泡泡
TA貢獻(xiàn)1829條經(jīng)驗(yàn) 獲得超6個(gè)贊
您可以使用str_matchwith STR1 (.*?) STR2（請注意，如果您只想匹配兩者之間的任何內(nèi)容STR1并STR2使用，則空格是“有意義的” STR1(.*?)STR2）。如果出現(xiàn)多次，請使用str_match_all。
library(stringr)
a<-" anything goes here, STR1 GET_ME STR2, anything goes here"
res <- str_match(a, "STR1 (.*?) STR2")
res[,2]
[1] "GET_ME"
使用基數(shù)R的另一種方法regexec（獲得第一個(gè)匹配項(xiàng)）：
test = " anything goes here, STR1 GET_ME STR2, anything goes here STR1 GET_ME2 STR2"
pattern="STR1 (.*?) STR2"
result <- regmatches(test,regexec(pattern,test))
result[[1]][2]
[1] "GET_ME"
瀟瀟雨雨
TA貢獻(xiàn)1833條經(jīng)驗(yàn) 獲得超4個(gè)贊
這是使用基數(shù)R的另一種方法
a<-" anything goes here, STR1 GET_ME STR2, anything goes here"
gsub(".*STR1 (.+) STR2.*", "\\1", a)
輸出：
[1] "GET_ME"
小怪獸愛吃肉
TA貢獻(xiàn)1852條經(jīng)驗(yàn) 獲得超1個(gè)贊
另一種選擇是用于qdapRegex::ex_between提取左右邊界之間的字符串
qdapRegex::ex_between(a, "STR1", "STR2")[[1]]
#[1] "GET_ME"
它還適用于多次出現(xiàn)
a <- "anything STR1 GET_ME STR2, anything goes here, STR1 again get me STR2"
qdapRegex::ex_between(a, "STR1", "STR2")[[1]]
#[1] "GET_ME" "again get me"
或多個(gè)左右邊界
a <- "anything STR1 GET_ME STR2, anything goes here, STR4 again get me STR5"
qdapRegex::ex_between(a, c("STR1", "STR4"), c("STR2", "STR5"))[[1]]
#[1] "GET_ME" "again get me"
第一次捕獲在“ STR1”和“ STR2”之間，而第二次捕獲在“ STR4”和“ STR5”之間。
- 3 回答
- 0 關(guān)注
- 2830 瀏覽
添加回答
舉報(bào)
0/150
提交
取消