我有一个与以下随机数据类似的数据帧:
data<- data.frame(
id = c('TEC', 'TEC', 'TEC', 'TEC', 'FIL', 'FIL', 'FIL'),
date = c('2009-10', '2009-11', '2009-12', '2010-04', '2000-05', '2006-10', '2006-11')
)
data$date <- ym(data$date)
set.seed(123)
data$re <- sample(1:100, nrow(data), replace = TRUE)
现在,我需要创建一个新的专栏,在其中我们必须根据组来放置数字.我是说,首先,我需要按身份分组.然后,在每个ID中,我需要基于连续日期的组.例如,在本例中,第一个id=TEC的第一个日期在2009-10,第二个日期是连续的(逐月)2009-11,第三个日期也是连续的,但是,第四个日期不是连续的.因此,我需要将前三个观察结果放入组1,将第四个观察结果放入组2.然后,使用下一个ID(FIL).第一个观察需要在组1中,第二个日期和第三个日期是连续的,在组2中也是如此.
我需要将其概括为一个巨大的数据帧,但具有相同的格式.
最终输出(在这个随机样本中)需要如下:
谢谢!