TODO: support this: ``` shp_url <- "http://www.dot.ca.gov/hq/tsip/gis/datalibrary/zip/Aviation/Airp_bnd2012.zip" mapview(read_shp(shp_url)) ```