删除数字之间的空格，但保留r中的字符串

Question

我只需要删除数字之间的空格，这样一个字符串:

"Hello 111 222 333 World!"

是

"Hello 111222333 World!"

知道如何在R中做到这一点吗?

Answer 1

使用一个小的替换函数和str_replace_all，同时简单地搜索数字[0-9]和一个或多个空格+。

library(stringr)
repl <- function(x) sub(" ", "", x)
str_replace_all(stri, "[0-9] +[0-9]", repl)
[1] "Hello 111222333 World!"

stri <- "Hello 111 222 333 World!"