R - stringr每两个间隔数字添加换行符

Question

特定

str1 <- "0 1 1 2 2 3 3 4 0 4"

我想要:

str2 <- "0 1\n1 2\n2 3\n3 4\n0 4"

使用stringr的方法是什么？

Answer 1

我们可以使用gsub捕获一个或多个数字,后跟一个空格,后跟数字作为一个组,后跟一个空格,并替换为捕获的组的反向引用,然后\n

gsub("(\\d+\\s\\d+)\\s", "\\1\n", str1)
#[1] "0 1\n1 2\n2 3\n3 4\n0 4"