# NOT RUN {
# looking for data on one day:
find_smap(id = "SPL4SMGP", dates = "2015-03-31", version = 4)
# searching across a date range
start_date <- as.Date("2015-03-31")
end_date <- as.Date("2015-04-02")
date_sequence <- seq(start_date, end_date, by = 1)
find_smap(id = "SPL4SMGP", dates = date_sequence, version = 4)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab