R语言如何将长连续字符串按每N个字符为一组拆分？

你原有写法的问题是没有利用正则量词的范围匹配特性，直接使用.{1,10}即可覆盖1-10个字符的匹配需求，正则默认的贪婪模式会优先匹配最长的10个字符，末尾不足10个时自动适配剩余长度，无需硬编码不同长度的匹配分支。

以下是三种不同场景的实现方案： #

方案1：base R 原生正则实现 #

无需安装额外依赖，适合纯base R开发场景：

# 提取所有长度为1-10的分组
groups <- regmatches(x, gregexpr(".{1,10}", x))[[1]]
# 分组间用空格拼接
result <- paste(groups, collapse = " ")

方案2：stringr 包实现 #

语法更简洁易读，适合tidyverse生态用户：

library(stringr)
# 提取分组
groups <- str_extract_all(x, ".{1,10}")[[1]]
# 空格拼接
result <- str_flatten(groups, " ")

方案3：无正则纯截取实现 #

性能更稳定，尤其适合处理超长字符串场景：

str_len <- nchar(x)
# 生成每组的起始索引
start_pos <- seq(1, str_len, by = 10)
# 生成每组的结束索引，避免超出字符串长度
end_pos <- pmin(start_pos + 9, str_len)
# 按位置截取分组
groups <- substring(x, start_pos, end_pos)
# 空格拼接
result <- paste(groups, collapse = " ")

你可以通过nchar(groups)验证分组长度，除最后一组外所有分组长度均为10，最后一组为剩余字符长度。

内容的提问来源于stack exchange，提问作者Ahdee