Значения под колонной комбинации

Question

У меня есть кадр данных следующего типа:

date  ID1 ID2 sum 
2017-1-5 1  a  200 
2017-1-5 1  b  150 
2017-1-5 2  a  300 
2017-1-4 1  a  200 
2017-1-4 1  b  120 
2017-1-4 2  a  300 
2017-1-3 1  b  150 

Я пытаюсь сравнить между комбинациями столбцов над разными датами, чтобы увидеть, если sum значение равно. Итак, в приведенном выше примере я хотел бы, чтобы код идентифицировал, что сумма [ID1=1, ID2=b] комбинация отличается между 2017-1-5 и 2017-1-4 (В моих реальных данных у меня есть более 2 ID категорий и более 2 Dates).

Я хочу, чтобы мой вывод был фреймом данных, который содержит все комбинации, которые включают (по крайней мере один) неравные результаты. В моем примере:

date  ID1 ID2 sum 
2017-1-5 1  b  150 
2017-1-4 1  b  120 
2017-1-3 1  b  150 

я пытался решить его с помощью петли, как это: Is there a R function that applies a function to each pair of columns без большого успеха.

Ваша помощь будет оценена по достоинству.

Answer 1

Используя dplyr, мы можем group_by_(.dots=paste0("ID",1:2)), а затем увидеть, если значения unique:

library(dplyr) 
res <- df %>% group_by_(.dots=paste0("ID",1:2)) %>% 
       mutate(flag=(length(unique(sum))==1)) %>% 
       ungroup() %>% filter(flag==FALSE) %>% select(-flag) 

group_by_ позволяет группировать ID столбцы легко. Просто измените 2 на сколько-нибудь много столбцов ID (т. Е. N) вы считаете, что они нумеруются последовательно от 1 до N. Столбец flag создан, чтобы указать, являются ли все значения одинаковыми (то есть число unique значений равно 1). Затем мы получаем filter для получения результатов, для которых flag==FALSE. Это дает желаемый результат:

res 
### A tibble: 3 x 4 
##  date ID1 ID2 sum 
##  <chr> <int> <chr> <int> 
##1 2017-1-5  1  b 150 
##2 2017-1-4  1  b 120 
##3 2017-1-3  1  b 150