## Not run:
# ### raster data ###
# library(sp)
# library(raster)
#
# m1 <- mapView(poppendorf[[5]])
#
# ### point vector data ###
# m2 <- mapView(breweries91)
#
# ### add two mapview objects
# m1 + m2 # final zoom level based on m2
# '+'(m2, m1) # final zoom level based on m1
# ## End(Not run)
Run the code above in your browser using DataLab