# NOT RUN {
library(getSpatialData)
# login
login_USGS(username = "your_username")
# get all available products as one vector
products <- get_products()
# or grouped
products <- get_products(grouped = T)
products$Sentinel
products$Landsat
products$MODIS
# or get products by a specific service
products <- get_products("Sentinel")
products <- get_products("Landsat")
products <- get_products("MODIS")
# }
Run the code above in your browser using DataLab