添加“\n”根据条件转换为字符串向量的某些元素

Question

假设我们有一个名为 vec 的字符串向量。有没有办法在vec第一个完整单词（即至少两个字符的术语）之前添加“\n” > 超过 10 个字符？

我的 desired_vec 如下所示。

（这是一个具有代表性的玩具示例，但我非常感谢答案是一个函数。）

vec = c("Van Beuningen et al b", "bbbb & zz", "AA, BB, & CC")

desired_vec = c("Van Beuningen \net al b", "bbbb & zz", "AA, BB, & \nCC")

Answer 1

您可以尝试像这样的正则表达式替换

gsub("^(.{9}.*?) (?=\\w{2,})(.*)", "\\1 \n\\2",vec, perl = TRUE)
# [1] "Van Beuningen \net al b" "bbbb & zz"              
# [3] "AA, BB, & \nCC"  

这将确保您在开头有一些字母，然后找到第一个空格，后跟至少 2 个字符，然后插入一个新行