正则表达式 – 按R中的最后一个空格拆分字符串

前端之家收集整理的这篇文章主要介绍了正则表达式 – 按R中的最后一个空格拆分字符串前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我有一个带有多个空格的字符串的向量.我想将它拆分为由最终空格分割的两个向量.例如:

vec <- c('This is one','And another','And one more again')

应该成为

vec1 = c('This is','And','And one more again')
vec2 = c('one','another','again')

有没有快速简便的方法来做到这一点?在使用gsub和regex之前我做过类似的事情,并设法使用以下内容获取第二个向量

vec2 <- gsub(".* ","",vec)

但无法弄清楚如何获得vec1.

提前致谢

解决方法

以下是使用前瞻断言的一种方法

do.call(rbind,strsplit(vec,' (?=[^ ]+$)',perl=TRUE))
#      [,1]           [,2]     
# [1,] "This is"      "one"    
# [2,] "And"          "another"
# [3,] "And one more" "again"

猜你在找的正则表达式相关文章