# Project a scan as a ppi
ppi <- project_as_ppi(example_scan)
# \donttest{
# Create a basemap that matches the extent of the ppi
basemap <- download_basemap(ppi)
# Map the radial velocity of the ppi onto the basemap
map(ppi, map = basemap, param = "VRADH")
# Increase the transparency of the basemap
basemap <- download_basemap(ppi, alpha = 0.3)
map(ppi, map = basemap, param = "VRADH")
# Download a different type of basemap, e.g. a gray-scale image.
# See get_map() in ggmap library for full documentation of the options.
basemap <- download_basemap(ppi, maptype = "toner-lite")
map(ppi, map = basemap, param = "VRADH")
# }
Run the code above in your browser using DataLab