找到第二个空间并在 R 中删除

【问题标题】：finding second space and remove in R找到第二个空间并在 R 中删除
【发布时间】：2021-11-25 02:41:42
【问题描述】：

我想在 R 中使用 tidyverse 删除多个名称的第二个空格（在 sp. 之后）

我的例子：

df <- data.frame(x = c("Araceae sp. 22", "Arecaceae sp. 02"))

我想要的输出

x
Araceae sp.22
Arecaceae sp.02

请给我一些建议好吗？

【问题讨论】：

【解决方案1】：

我们可以使用sub 来捕获一个或多个不是空格的字符，后跟空格 (\\s+) 和另一组不是空格的字符，并替换为捕获组的反向引用

df$x <- sub("^(\\S+\\s+\\S+)\\s+", "\\1", df$x)
df$x
[1] "Araceae sp.22"   "Arecaceae sp.02"

或者我们可以使用str_replace

library(dplyr)
library(stringr)
df %>%
    mutate(x = str_replace(x, "^(\\S+\\s+\\S+)\\s+", "\\1"))

【讨论】：