拆分一个间隙为两个字符的字符串

Question

我编写了这样做的代码：

text <- "abcdef"

substring(text, first = (1:(nchar(text)/2)) * 2 - 1, last = (1:(nchar(text)/2)) * 2)

结果：

"ab" "cd" "ef"

它适用于小型字符串，但不适用于长字符串。

有什么建议，我怎么能更快地做到这一点？

Answer 1

尝试trimws(gsub("(.{2})", "\\1 ", text))和 stringi::stri_sub(text, seq(1, stringi::stri_length(text), by = 2), length = 2）