regex - 将字符串保留到 R 中模式第一次出现的位置

Question

我想将字符串保留到第一次出现以下模式:小写字母后跟大写字母，然后再次小写字母。

例如

"This is My testString, how to keepUntil test"

我想返回这是我的测试

这是我迄今为止尝试过但不成功的方法:

library("magrittr")

"This is My testString, how to keepUntil test" %>% gsub("(.*[a-z])[A-Z][a-z]?.*", "\\1", .)

Answer 1

我们可以使用strsplit

strsplit(str1, "(?<=[a-z])(?=[A-Z])", perl = TRUE)[[1]][1]
#[1] "This is My test"

或使用sub

sub("([A-Za-z ]+[a-z])[A-Z].*", "\\1", str1)
#[1] "This is My test"

数据

str1 <- "This is My testString, how to keepUntil test"