R |中的字符串转换 分组字符串的单词

Question

我想将字符串分组(如下所示)

text="Lorem,ipsum,dolor,sit,amet,consectetuer"

像这样

textNew="Lorem ipsum,ipsum dolor,dolor sit,sit amet,amet consectetuer"

谢谢.

Answer 1

通过gsub功能,

> text="Lorem,ipsum,dolor,sit,amet,consectetuer"
> f <- gsub(",([^,]*)", " \\1,\\1", text, perl=TRUE)
> result <- gsub(",[^,]*$", "", f, perl=TRUE)
> result
[1] "Lorem ipsum,ipsum dolor,dolor sit,sit amet,amet consectetuer"