фильтровать одинаковые значения в строке, добавлять одинаковые значения вместе

Question

В приведенном ниже примере набора данных из столбца icase_id я хочу удалить числа, которые появляются более двух (> 2) и менее (<2) раз.</p>

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

summ 2 3 1 2 3 4 2 1

после этого вы хотите посчитать сумму каждого набора чисел и сохранить его в одном icac_id, например, так:

icase_id 2, 4

summ 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))