将data.frame的副本分离到另一个data.frame中

我有一个data.frame x，我想从中把所有重复的行放在一个新的数据框z中。我的数据框如下所示：

1 A
1 A
2 B
3 C
4 D
4 D

目前，我使用z为这个问题提供了一个可能的解决方案：启用fromLast=T时计算重复两次一次：

> d <- data.frame(x=c(1,1,2,3,4,4), y=c('A', 'A', 'B', 'C', 'D', 'D'))
> d[c(duplicated(d) | duplicated(d, fromLast = T)),]

  X1 X2
1  1  A
2  1  A
5  4  D
6  4  D

---

这是一个关于stackoverflow的问题

1 A
1 A
4 D
4 D

> d <- data.frame(x=c(1,1,2,3,4,4), y=c('A', 'A', 'B', 'C', 'D', 'D'))
> d[c(duplicated(d) | duplicated(d, fromLast = T)),]

  X1 X2
1  1  A
2  1  A
5  4  D
6  4  D