Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/cocoa/3.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
rshiny从geojson文件的列表链接向传单地图添加多边形_Shiny_Leaflet_Geojson - Fatal编程技术网
Fatal编程技术网
  • shiny/
  • rshiny从geojson文件的列表链接向传单地图添加多边形

rshiny从geojson文件的列表链接向传单地图添加多边形

shiny leaflet

rshiny从geojson文件的列表链接向传单地图添加多边形,shiny,leaflet,geojson,Shiny,Leaflet,Geojson,一个文件 s1 polyfilter<-filter(s1, st_is(geometry, c("POLYGON", "LINESTRING","MULTILINESTRING"))) pointfilter <-filter(s1, st_is(geometry, "POINT")) leafletProxy("map-map",data=data)%>%

一个文件 
s1

polyfilter<-filter(s1, st_is(geometry, c("POLYGON", "LINESTRING","MULTILINESTRING")))
pointfilter <-filter(s1, st_is(geometry, "POINT"))



leafletProxy("map-map",data=data)%>%
        addPolygons(data = polyfilter)%>%
        addMarkers(data = pointfilter)%>%



files <- list.files(pattern = "geom", recursive = TRUE)