有条件的日期和群组

Question

我有这个数据集：

class = c("a", "b", "a", "b", "c", "a", "a", "a", "b", "c", "c", "a")
date = seq(as.Date("2014/1/1"), as.Date("2014/12/01"), by = "month")                    
value = c(0,0,0,1,0,0,1,0,0,0, 0, 0)
data =data.frame(cbind(date, class, value))

我需要知道在接下来的三个月里是否有一个一个一个。例如：＆＃34; b＆＃34;课程从2014/02/01开始，所以我需要检查是否在2014/02/01和2014/04/01的范围内，该类中有一个零（变量值），创建一个新的变量，取值为一个，如果最后一个条件得到满足。

我尝试将dplyr与group_by和mutate一起使用，但我无法解决。