## Not run:
# ## Retrieve all available spectra
# avl <- USGS_get_available_files()
#
# ## Download all spectra matching "grass-fescue"
# grass_spectra <- USGS_retrieve_files(avl = avl, pattern = "grass-fescue")
#
# plot(grass_spectra)
# ## End(Not run)
Run the code above in your browser using DataLab