## Not run: ------------------------------------
# # dontrun() used because running the example requires internet access.
# data(SubsetExample)
# # Extend the years to download for
# SubsetExample$start.date <- 2001
# SubsetExample$end.date <- 2009
# MODISSubsets(LoadDat=SubsetExample, Product="MCD12Q1", Bands=c("Land_Cover_Type_1"),
# Size=c(3,3), StartDate=TRUE)
#
# LandCover(Band="Land_Cover_Type_1")
#
## ---------------------------------------------
Run the code above in your browser using DataLab