r - 在单词的字母之间插入空格

Question

我正在尝试创建一个能够返回同一字符串的不同版本但字母之间有空格的函数。

类似于:

input <- "word"

返回:

w ord
wo rd
wor d

Answer 1

我们首先使用 strsplit 将字符串分成每个字符。然后，我们使用 sapply 在每个位置附加 一个空白空间。

input <- "word"
input_break <- strsplit(input, "")[[1]]

c(input, sapply(seq(1,nchar(input)-1), function(x)
                      paste0(append(input_break, " ", x), collapse = "")))

#[1] "word"  "w ord" "wo rd" "wor d"

?append 给我们 append(x, values, after = length(x)) 其中 x 是向量，value 是要插入的值(这里是 "" )，after 是之后您要在哪个位置插入 values。