32

这可能是一个简单的问题，但我仍然需要一些帮助来使用 R。

我有一个data.frame（main_data），可以说..

NAMES   AGE     LOC
Jyo     23      Hyd
Abid    27      Kar
Ras     24      Pun
Poo     25      Goa
Sus     28      Kar

我希望根据名称列表删除几行。所以假设我有另一个表格列表，如下所示：

NAMES_list
Jyo
Ras
Poo

所以根据这个列表，如果任何名称与我上面的“main_data”表匹配，那么我想删除包含它们的整行，所以结果应该如下

NAMES   AGE     LOC
Abid    27      Kar
Sus     28      Kar

谁能帮助我如何使用 R 实现这一目标？提前致谢.. ：）

4

4 回答 4

55

使用%in%：

main_data2 <- main_data[ ! main_data$NAMES %in% NAMES_list, ]
于 2012-10-22T13:35:57.770 回答
13

如果碰巧你实际上有 a data.table（而不是 a data.frame），而你data.table有 a key，你可以使用 not join 成语

library(data.table)
dat <- as.data.table(read.table(text="
NAMES   AGE     LOC
Jyo     23      Hyd
Abid    27      Kar
Ras     24      Pun
Poo     25      Goa
Sus     28      Kar", 
stringsAsFactors=FALSE, header=TRUE))

setkey(dat, NAMES)

to.remove <- c("Jyo","Ras","Poo")
dat[-dat[to.remove, which=TRUE]]
#   NAMES AGE LOC
#1:  Abid  27 Kar
#2:   Sus  28 Kar

当然，其他两个 答案也适用于 a data.table，但这应该更有效。

编辑

从 data.table 版本 1.8.3 开始，“！” 前缀可用于“不加入”（参见NEWS）。

dat[!to.remove]
   NAMES AGE LOC
1:  Abid  27 Kar
2:   Sus  28 Kar
于 2012-10-22T14:13:37.720 回答
9

复制您的数据：

dat <- read.table(text="
NAMES   AGE     LOC
Jyo     23      Hyd
Abid    27      Kar
Ras     24      Pun
Poo     25      Goa
Sus     28      Kar", 
stringsAsFactors=FALSE, header=TRUE)

remove <- c("Jyo", "Ras", "Poo")

简单子集：

dat[!dat$NAMES %in% remove, ]
  NAMES AGE LOC
2  Abid  27 Kar
5   Sus  28 Kar

它是这样工作的：使用!否定的组合并%in%返回一个逻辑向量，该向量指示要保留的行：

!dat$NAMES %in% remove
[1] FALSE  TRUE FALSE FALSE  TRUE

我记得我第一次看到这个结构时感到很惊讶。为什么它会!dat$NAMES返回任何有用的东西？好吧，当然洞察力是%in%首先评估中缀运算符，因此 the!只是一个逻辑 NOT 运算符。

于 2012-10-22T13:38:50.547 回答
1

match如果您的 main_data$NAMES 中有唯一值，您也可以使用

NAMES_list <- c("Jyo","Ras","Poo")
main_data <- main_data[-match(NAMES_list,main_data$NAMES),]
main_data
  NAMES AGE LOC
2  Abid  27 Kar
5   Sus  28 Kar

它将删除与您的 NAMES_list 与 main_data$NAMES 完全匹配的行。

于 2012-10-23T05:03:28.833 回答