小编arn*_*d-c的帖子

我正在尝试按组计算连续日期的最大长度，但我很难得到它。我已经包含了一个类似布局的小标题的代码。

library(dplyr)

# construct sample tibble:
df <- tibble(
  key = rep(1:2, c(6,4)),
  Date = c(seq(as.Date('2016-12-17'), as.Date('2016-12-19'), '1 day'),
           seq(as.Date('2016-12-21'), as.Date('2016-12-23'), '1 day'),
           seq(as.Date('2017-05-18'), as.Date('2017-05-21'), '1 day'))          
)

我试图用lag()添加标签（1）来表示时，有日期之间的间隙，再算上的最大长度0列中的使用rle，但这并不工作中连续的日期和差距的所有可能的配置keys。

有没有办法按组返回最大连续日期数？