正则表达式在R中删除字符串最后一个空格后的部分

Question

我希望在R中有一个gsub表达式，以删除字符串中最后一个空格之后出现的所有内容。例如，string="Da Silva UF"应返回我"Da Silva"。有什么想法吗？

Answer 1

使用$锚点：

> string = "Da Silva UF"
> gsub(" [^ ]*$", "", string)
[1] "Da Silva"

Answer 2

您可以使用以下内容。

string <- 'Da Silva UF'
gsub(' \S*$', '', string)
[1] "Da Silva"

说明：

            ' '
S*         non-whitespace (all but n, r, t, f, and " ") (0 or more times)
  $         before an optional n, and the end of the string