0

次の 2 つdata.frameの s

Set1 <- data.frame(Object=c("one","two","three","four"),
                   Age=c(1,1,1,1),
                   Value=c(1,2,4,8))
Set2 <- data.frame(Object=c("one","two","three","five"),
                   Age=c(2,2,2,2),
                   Value=c(4,8,2,7))

Set1と の両方で（列「オブジェクト」に従って）繰り返されるエントリを取得したいSet2、つまり

  Object Age Value
1    one   1     1
2    two   1     2
3  three   1     4
4    one   2     4
5    two   2     8
6  three   2     2

どうすればこれを行うことができますか？

4

2 に答える 2

3 
> x = intersect(Set1$Object, Set2$Object)
> rbind(Set1[Set1$Object %in% x,], Set2[Set2$Object %in% x,])
  Object Age Value
1    one   1     1
2    two   1     2
3  three   1     4
4    one   2     4
5    two   2     8
6  three   2     2
于 2013-07-18T19:15:16.857 に答える
0

あなたの質問を正しく理解しているかどうかわからないので（あなたの例は質問にまったく適合しません）、ヒントを提案することしかできません：

Set <- rbind(Set1, Set2)

rv <- Set[Set[, "Object"] %in% duplicated(Set[, "Object"]), ]

于 2013-07-18T19:09:18.153 に答える