r - 如何识别R中的 "similar"行？

Question

社区的所有成员，大家好， 我试图找出如何比较数据库的元素并通过新的二进制变量来识别它们。 我的数据库是这样的:

id=rep((1:2),5)
date<-seq(from=as.Date("2013-01-1"),to=as.Date("2013-01-05"),by=1)
trap<-c(1,1,3,1,4,2,3,4,1,4)
DB<-data.frame(id,date,trap)
DB<-DB[order(DB$date),]
DB$id[2]<-1
DB$trap[2]<-1
result<-c("N","N","N","N","N","N","Y","Y","Y","Y")
DB<-cbind(DB,result)

我想识别 id 不同但日期和陷阱值相同的所有元素，如结果列中的报告。

我已经使用 ave 函数尝试了一些代码(基本上来自另一个“类似”问题)，但没有成功。 一如既往，任何提示将不胜感激!!

Answer 1

(duplicated(DB[,-1]) | duplicated(DB[,-1],fromLast=TRUE)) & 
         !(duplicated(DB) | duplicated(DB,fromLast=TRUE))
#[1] FALSE FALSE FALSE FALSE FALSE FALSE  TRUE  TRUE  TRUE  TRUE