删除R中字符串中第一个大写字母实例之前的字符

Question

我正在尝试删除字符串向量中每个字符串的第一个大写字母实例之前的所有字符：

x <- c(" its client Auto Group",  "itself and Phone Company", ", client Large Bank")

我试过了：

sub('.*?[A-Z]', '', x) 

但是返回：

"uto Group"  "hone Company"   "arge Bank"

我需要它返回：

"Auto Group"    "Phone Company" "Large Bank"

有什么想法吗？

谢谢。

Answer 1

您需要使用带有反向引用的捕获组：

sub("^.*?([A-Z])", "\\1", x)

这里，

• ^ - 字符串的开头
• .*? - 尽可能少的任何 0+ 个字符
• ([A-Z]) - 捕获组 1 捕获将在替换模式中使用 \1 引用的大写 ASCII 字母。

所以，我们通过反向引用恢复我们在结果中捕获的内容。