# NOT RUN {
# get a timeline for MODIS data
data("timeline_2000_2017")
# get a set of subsets for a period of 10 years
ref_start_date <- lubridate::ymd("2000-08-28")
ref_end_date <- lubridate::ymd("2000-08-13")
subset_dates.lst <- sits_match_timeline (timeline_2000_2017, ref_start_date, ref_end_date)
# }
Run the code above in your browser using DataLab