Найти количество нет. дней и нет. события

Question

Можно ли вычислить в r количество дней и количество b в переменной r из следующей таблицы:

id  r   s   t   u

1   a   100 1   27-06-2017

1   a   200 0   29-06-2017

1   b   300 0   01-07-2017

2   a   500 1   12-06-2017

3   b   100 0   02-07-2017

3   a   600 1   02-07-2017

4   a   200 0   12-06-2017

4   a   300 1   15-06-2017

4   b   200 0   18-06-2017

4   a   100 0   01-07-2017

5   a   200 0   04-06-2017       

, сгруппированных по уникальным ID, где условие =, когда r = b,сумма s> = сумма s, когда t = 1?

Answer 1

Мы можем попробовать

library(dplyr)
df1 %>%
   group_by(id) %>% 
   summarise(new =  sum((r == "b") & s >= sum(s[t == 1])))