连续过滤相同的值，将相同的值加在一起

Question

在下面的数据集示例中，我要从icase_id列中删除出现两次（> 2）且少于（<2）次的数字。

icase_id 2,2,3,3,3,1,4,4

摘要 2 3 1个 2 3 4 2 1

1. 完成此操作后，想要计算每组数字的总数并将其保存在一个icase_id中，例如：

icase_id 2、4

摘要5、3

所以我需要有人帮助如何完成此练习。预先感谢

Answer 1

带有library(dplyr)

的基本内容

df <- cbind.data.frame(icase_id=c(2,2,3,3,3,1,4,4),summ=c(2, 3, 1, 2, 3, 4, 2, 1))

df %>% 
  group_by(icase_id) %>%
  filter(n()==2 ) %>% 
  summarise(summ=sum(summ))