我想找出哪两行(或更多行)具有相同的x,y(位置),但ID不同.
在下表中,我只想知道最后两行.
x | y | id |
---|---|---|
1 | 2 | 1 |
1 | 2 | 1 |
1 | 3 | 4 |
2 | 3 | 1 |
2 | 3 | 2 |
# example data
x <- read.table(text = "x y id
1 2 1
1 2 1
1 3 4
2 3 1
2 3 2", header = TRUE)
我想找出哪两行(或更多行)具有相同的x,y(位置),但ID不同.
在下表中,我只想知道最后两行.
x | y | id |
---|---|---|
1 | 2 | 1 |
1 | 2 | 1 |
1 | 3 | 4 |
2 | 3 | 1 |
2 | 3 | 2 |
# example data
x <- read.table(text = "x y id
1 2 1
1 2 1
1 3 4
2 3 1
2 3 2", header = TRUE)
另一种方法是使用dplyr
:
x %>%
group_by(x, y) %>%
filter(n_distinct(id) > 1)
# A tibble: 2 x 3
# Groups: x, y [1]
x y id
<int> <int> <int>
1 2 3 1
2 2 3 2