如何使用传单获取数据集与shapefile对齐?

我想使用称为jb的数据制作地图。我可以说我的数据集中我的districts变量中的一些地区与shapefile匹配。其余部分为“ FLASE”,因为我没有从shape文件中找到完整的区域,因为我没有从这些区域获得响应。我希望如果我去不管,那些不匹配的区域将被分配“不够信息”。

我继续不管。

这是我的6个区的数据集,我的shapefile有150个区:

          Districts  totalrespond totalcont      per.content
1               1          4         2                 50            
2               2          2         0                 0           
3               3          1         0                 0 
4               4          1         0                 0 
5               5          2         0                 0 

我把这段代码:

bins <- c(0,5,10,30,40,50,60)
pal<-colorBin("RdYlBu",domain=jb$per.content, bins=bins)


m<- leaflet() %>%
   setView(-96,37,4) %>%
   addProviderTiles(providers$Stamen.Toner)%>%
   addPolygons(data =districts.th,
               weight = 1,
               smoothFactor = 0.5,
               color = "white",
               fillOpacity = 0.8,
               fillColor= ~pal(fb$per.content))
m

我只得到了openstreet地图,没有我期望的各色层。我期待地图上有一个彩色图层。我不确定是否由于缺少地区匹配或其他原因。