regex - 确定字符串是否以空格结尾，如果不是，则附加一个空格

Question

我想检查一个字符串是否以空格结尾。如果不是，我想在字符串的末尾添加一个尾随空格字符。

实际上，我检查字符串是否以空格结尾 grepl然后我 paste最后一个空格。

append_space <- function(x) {
  if(!grepl("(\\s)$", x))
    x <- paste0(x, " ")
  return(x)
}

但是，我想我可以直接使用 sub 做到这一点。函数，使用 ! 进行负前瞻但我不知道如何使用它。

有谁知道我可以如何使用 sub ?

Answer 1

您可以使用 sub在替换部分中使用捕获组和反向引用:

sub("(\\S)$", "\\1 ", x)

\S意味着 non-whitespace .

见 demo