dataset <-
tibble::tibble(Id = c("A", "A", "A", "B", "B", "B"),
Datetime = lubridate::as_datetime(1) +
lubridate::days(c(0:2, 4, 6, 8))) %>%
dplyr::group_by(Id)
dataset %>% gapless_Datetimes()
dataset %>% dplyr::ungroup() %>% gapless_Datetimes()
dataset %>% gapless_Datetimes(epoch = "1 day")
Run the code above in your browser using DataLab