感谢您阅读我的文章。我试图通过使用2个数据源和函数plot_mapbox分层数据，在R中使用Plotly创建一个地图。该地图将显示区域商务区中商店的位置。
test是分区区域的geoJSON文件 test2是使用经度和纬度坐标的营业地点的csv文件
我尝试了对数据进行分层并合并两个geoJSON文件。第一个文件是geoJSON文件（业务区域），第二个文件是具有经度和纬度的.csv（商店位置）。我将csv文件转换为geoJSON文件，然后尝试合并它们。我真的需要附加它们，因为它们没有公用密钥。
library(plotly)
library(geojsonR)
library(sf)
test<-st_read("D:/SPB/Zoning_Detailed.geojson", quiet=FALSE, , geometry_column="SHAPE_Area")
test2<-read.csv("D:/SPB/Pet_Bus.csv")
一层示例
plot_mapbox(data=test, color=~ZONING) %>%
add_markers(data=test2, x=~Longitude, y=~Latitude)
layout(mapbox=list(style = "streets"))
一个合并示例（仅在合并中添加第一个文件） 文件Zoning_Detailed.geojson和Pet_Bus.geojson位于Merge文件夹中。一世 将Pet_Bus.csv转换为geojson文件。 由于test和test2彼此独立，但在同一城市，因此应该附加该内容。
merge_files("D:/SPB/Merge/", "D:/SPB/Merge/test7.geojson")