Not working with shapefile zipped within a folder or several layers of subfolder. ``` # test case: some_url <- "ftp://newftp.epa.gov/Air/emismod/2016/alpha/spatial_surrogates/shapefiles/2014_Potential_Idling_Locations.zip" mapview(read_shp(some_url)) ``` #1