# NOT RUN {
# load a spatial polygon object of Navarre
data(ex.navarre)
# retrieve jpg images covering Navarre region between 2011 and 2013
searchres <- modSearch(product = "MOD09GA",
startDate = as.Date("01-01-2011", "%d-%m-%Y"),
endDate = as.Date("31-12-2013", "%d-%m-%Y"),
collection = 6,
resType = "browseurl",
extent = ex.navarre)
modPreview(searchres, 1)
modPreview(searchres, 1, size = 600)
# }
Run the code above in your browser using DataLab