R паттернов в подфункции

Question

Я хочу заменить пробел на табуляцию в текстовой переменной.

Например, что-то вроде:

space <- "123 4 56 789"
tab <- sub("[[:space:]]+$", "[[:space:]]+$", x)
print(tab)

Answer 1

Это работает?

x <- "123 4    56 789"
x <- gsub("^\\s+|\\s+$", "", x) #eliminate trailing and leading spaces
tab <- gsub(" +", "\t", x, ) #sub out spaces between for \t
cat(tab)

Answer 2

Просто используйте функцию gsub следующим образом:

gsub(' ', '\t', x)