r - 将字符串拆分为给定长度的子字符串并带有余数

Question

给定一个字符串，例如:

text <- "abcdefghijklmnopqrstuvwxyz"

我想将字符串切成子字符串，例如长度为 10，并保留其余部分:

"abcdefghij"
"klmnopqrst"
"uvwxyz"

我知道的所有创建子字符串的方法都不会给我 6 个字符的剩余子字符串。我已经尝试过以前类似问题的答案，例如:

> substring(text, seq(1, nchar(text), 10), seq(10, nchar(text), 10))
[1] "abcdefghij" "klmnopqrst" ""  

关于如何获得所需长度的所有子字符串和任何剩余字符串的任何建议将不胜感激。

Answer 1

尝试

strsplit(text, '(?<=.{10})', perl=TRUE)[[1]]
#[1] "abcdefghij" "klmnopqrst" "uvwxyz" 

或者您可以使用 library(stringi)为了更快的方法

library(stringi)
stri_extract_all_regex(text, '.{1,10}')[[1]]
#[1] "abcdefghij" "klmnopqrst" "uvwxyz"