Question

假设我有一个如下数据框，

ID <- c("A","A","A","B","B","B","C","C") 
Type <- c(45,46,47,45,46,47,45,46)
Point_A <- c(10,15,20,8,9,10,35,33) 
df <- data.frame(ID,Type,Point_A)

我在这个数据帧中使用了dplyr groupby函数，

library(dplyr)
df %>% group_by(ID) %>% summarise(q=n())

以下是我得到的输出，

      ID     q
  (fctr) (int)
1      A     3
2      B     3
3      C     2

现在我想过滤计数为2的行。理想情况下，代码应该删除，计数后面的行为2.代码的输出应为，

  ID Type Point_A
1  A   45      10
2  A   46      15
3  A   47      20
4  B   45       8
5  B   46       9
6  B   47      10

因为已删除了计数为2的行。

有可能这样做吗？有人可以帮我这么做吗？

由于

Answer 1

您可以在没有n()的情况下一起使用filter()和summarize()：

df %>%
  group_by(ID) %>%
  filter(n() != 2)

# Source: local data frame [6 x 3]
# Groups: ID [2]
# 
#       ID  Type Point_A
#   (fctr) (dbl)   (dbl)
# 1      A    45      10
# 2      A    46      15
# 3      A    47      20
# 4      B    45       8
# 5      B    46       9
# 6      B    47      10

根据dplyr groupby输出删除/过滤行

1 个答案: