Как удалить лишнее пробел между словами внутри символьного вектора, используя?

Предположим, что у меня есть вектор символов, например

"Hi,  this is a   good  time to   start working   together.".

Я просто хочу иметь

" Hi, this is a good time to start working together."

Только одно пробел между двумя словами. Как это сделать в R?

Ответы

Ответ 1

gsub - ваш друг:

test <- "Hi,  this is a   good  time to   start working   together."
gsub("\\s+"," ",test)
#[1] "Hi, this is a good time to start working together."

\\s+ будет соответствовать любому пробелу (пробелу, табуляции и т.д.) или повторениям пробелов, и заменит его на единое пространство " ".

Ответ 2

Другой вариант - функция squish из библиотеки stringr

library(stringr)
string <- "Hi,  this is a   good  time to   start working   together."
str_squish(string)
#[1] ""Hi, this is a good time to start working together.""