将data.frame中的部分名称匹配到新列

Question

我有一个data.frame，其中有一列Sample.Names。 名称包含样本来源的信息。 例如，c（RT4_4，RT3_6，RT4_2，RT3_9，RT5_5）RTx是它们来自的站点的名称，然后跟随一个数字。

我想要一个新的专栏，为我提供有关其来源的信息。 如果Sample.Names包含RT4-> df $ Site == RT4

我不知道是否有功能可以让您查看我的想法的一部分名称

df$Site <- with(df, ifelse(df$Sample.Name %in% "RT4","RT4", ifelse(df$Sample.Name %in% "RT3","RT3","RT5")))

这不起作用

Answer 1

您可以使用sub ：

df$Site <- sub("_.+", "", df$Sample.Name)

这也适用于包含多个数字的数字。