在R中的列中的字符之间添加句点_R_Dataframe

在R中的列中的字符之间添加句点

r dataframe

在R中的列中的字符之间添加句点,r,dataframe,R,Dataframe,有人知道我可以用于此问题的任何代码吗？使用sub，我们可以在零宽度查找（？使用substr（）在以下位置拆分字符串： (?<=^[A-Z]) （^。）是分组为（）的字符串中的第一个字符子（）将第一个实例替换为对组的反向引用（\\1）加上 #End Goal: #D.acut #H.hyde #F.affi #D.melan #J.robusta df$species <- sub("(?<=^.)", "\\.", df$species, perl=TRUE) df$spe

有人知道我可以用于此问题的任何代码吗？

使用

sub

，我们可以在零宽度查找

（？使用substr（）
在以下位置拆分字符串：
(?<=^[A-Z])

（^。）
是分组为（）
的字符串中的第一个字符子（）
将第一个实例替换为对组的反向引用（\\1
）加上

#End Goal:
#D.acut
#H.hyde
#F.affi
#D.melan
#J.robusta

df$species <- sub("(?<=^.)", "\\.", df$species, perl=TRUE)
df$species

[1] "D.acut"    "H.hyde"    "F.affi"    "D.melan"   "J.robusta"

(?<=^[A-Z])

species <- c("Dacut","Hhyde","Faffi","Dmelan","Jrobusta")
leg <- c(1,2,3,4,5)
df <- data.frame(species, leg, stringsAsFactors = FALSE)


df$species <- paste0(
  substr(df$species, 1, 1),
  ".",
  substr(df$species, 2, nchar(df$species))
)
df$species

df$species <- sub("(^.)", "\\1.", df$species)