# 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, maptype = "toner-lite")
# Map the radial velocity of the ppi onto the basemap
map(ppi, map = basemap, param = "VRADH")
# Extend the plotting range of velocities, from -50 to 50 m/s
map(ppi, map = basemap, param = "VRADH", zlim = c(-50, 50))
# Map the reflectivity
map(ppi, map = basemap, param = "DBZH")
# Change the color palette to Viridis colors
map(ppi, map = basemap, param = "DBZH", palette = viridis::viridis(100), zlim=c(-10,10))
# Give the data more transparency
map(ppi, map = basemap, param = "DBZH", alpha = 0.3)
# Change the appearance of the symbol indicating the radar location
map(ppi, map = basemap, radar_size = 5, radar_color = "blue")
# Crop the map
map(ppi, map = basemap, xlim = c(12.4, 13.2), ylim = c(56, 56.5))
# }
Run the code above in your browser using DataLab