如何保留真正的唯一行？

发布于 2025-01-11 00:15:53 字数 720 浏览 0 评论 0原文

这里是一个矩阵的例子，

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

我想只提取 A 和 B 中唯一的行。我不能使用唯一、重复等，因为它们始终保留我的重复行之一。

在最终结果中，我希望获得：

A	B	C
1	2	4
2	1	1

我该怎么做？谢谢

原文

Here an example of a matrix,

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

I would like extract only rows which are unique in A and B.
I can't use unique, duplicate etc. because they retain always one of my duplicated row.

In final result I wish obtain:

A	B	C
1	2	4
2	1	1

How can I do it?
Thank you

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

無處可尋 2025-01-18 00:15:53

这里有几个选项 -

Base R -

cols <- c('A', 'B')
res <- df[!(duplicated(df[cols]) | duplicated(df[cols], fromLast = TRUE)), ]
res

#  A B C
#3 1 2 4
#4 2 1 1

dplyr -

library(dplyr)
df %>% group_by(A, B) %>% filter(n() == 1) %>% ungroup

# A tibble: 2 x 3
#      A     B     C
#  <int> <int> <int>
#1     1     2     4
#2     2     1     1

Here are couple of options -

Base R -

cols <- c('A', 'B')
res <- df[!(duplicated(df[cols]) | duplicated(df[cols], fromLast = TRUE)), ]
res

#  A B C
#3 1 2 4
#4 2 1 1

dplyr -

library(dplyr)
df %>% group_by(A, B) %>% filter(n() == 1) %>% ungroup

# A tibble: 2 x 3
#      A     B     C
#  <int> <int> <int>
#1     1     2     4
#2     2     1     1

回复收藏 0 原文

千と千尋 2025-01-18 00:15:53

data.table

df <- data.frame(
  A = c(1L, 1L, 1L, 2L, 3L, 3L),
  B = c(1L, 1L, 2L, 1L, 1L, 1L),
  C = c(1L, 4L, 4L, 1L, 1L, 2L)
)

library(data.table)
setDT(df)[, .SD[.N == 1], by = list(A, B)]
#>    A B C
#> 1: 1 2 4
#> 2: 2 1 1

^{由 reprex 包于 2022 年 2 月 28 日创建(v2.0.1)}

data.table

df <- data.frame(
  A = c(1L, 1L, 1L, 2L, 3L, 3L),
  B = c(1L, 1L, 2L, 1L, 1L, 1L),
  C = c(1L, 4L, 4L, 1L, 1L, 2L)
)

library(data.table)
setDT(df)[, .SD[.N == 1], by = list(A, B)]
#>    A B C
#> 1: 1 2 4
#> 2: 2 1 1

^{Created on 2022-02-28 by the reprex package (v2.0.1)}

回复收藏 0 原文

~没有更多了~