## Not run:
# spdf_world <- ne_download( scale = 110, type = 'countries' )
#
# if (require(sp)) {
# plot(spdf_world)
# plot(ne_download(type = 'populated_places'))
# }
#
# # reloading from the saved file in the same session with same arguments
# spdf_world2 <- ne_load( scale = 110, type = 'countries' )
#
# # download followed by load from specified directory will work across sessions
# spdf_world <- ne_download( scale = 110, type = 'countries', destdir = getwd() )
# spdf_world2 <- ne_load( scale = 110, type = 'countries', destdir = getwd() )
#
# # for raster, here an example with Manual Shaded Relief (MSR)
# # download & load
# rst <- ne_download(scale = 50, type = 'MSR_50M', category = 'raster', destdir = getwd())
#
# # load after having downloaded
# rst <- ne_load(scale = 50, type = 'MSR_50M', category = 'raster', destdir = getwd())
#
# # plot
# library(raster)
# raster::plot(rst)
# ## End(Not run) # end dontrun
Run the code above in your browser using DataLab