R/seq_date.R

Defines functions seq_date

seq_date <- function(begin, end, freq) {
  begin <- begin
  end <- end

  i <- lubridate::interval(begin, end)

  nb_pts <- floor(i / freq)
  begin + 0:nb_pts * freq
}
RADS-project/analysr-git-test documentation built on Feb. 13, 2022, 8:13 a.m.