man/examples/ex-zip_dates.R

library(lubridate)
data("station_HisPos")
d <- station_HisPos[site == 50136, ]
dates <- d[, make_date(year, month, day)]

s1 <- zip_dates(dates)
s2 <- zip_dates(dates, by = "year", check_duplicate = TRUE)
kongdd/MissInfo documentation built on Jan. 14, 2024, 2:22 a.m.