r - 如何替换字符串中的内部大写字母

Question

我有一系列字符串，如下所示:

vec<-c("Peronospora boniNhenrici","Cystoseira abiesNmarina","Niplommatina rubra",
 "Padina sanctaeNcrucis","Nachygrapsus NaurusNliguricus","Melphidippa borealis")

我想用“-”替换每个元素的第二个单词中的内部大写“N”，以便它:

("Peronospora boni-henrici","Cystoseira abies-marina","Niplommatina rubra",
 "Padina sanctae-crucis,"Nachygrapsus Naurus-liguricus","Melphidippa borealis")

有什么建议？我有使用以下位置的位置:

stri_locate_all(vec,regex = "[N]")

但我不确定如何替换内部的“N”。当我尝试使用 gsub 替换大写字母“N”时，它会替换所有出现的 N，而不仅仅是内部的“N”。

Answer 1

我们可以寻找任何被 \w 包围的 N。 , 在正则表达式中匹配任何字母数字字符或下划线。如果这太宽泛，您可以替换 \w与 [a-zA-Z]只匹配字母:

stringr::str_replace_all(vec, "(\\w)N(\\w)", "\\1-\\2")