我正在尝试绘制密歇根州的地图，其中每个州议会大厦的地区都以他们的党派投票方式来着色。我到目前为止已采取的步骤如下：
我已经导入了shapefile：
mi_dist <- readShapeSpatial("C:\\Users\\Mahamed\\Downloads\\MI Shapefiles\\cb_2017_26_sldl_500k.shp")
我已将shapefile设置为数据集：
mi_reg <- fortify(mi_dist)
要合并，请设置shapefile数据集的共享列和将区域标识为字符的较大数据集：
mi_reg$id <- as.character(mi_reg$id)
mi$id <- as.character(mi$id)
然后我合并了数据集：
mi_merge <- inner_join(mi, mi_reg)
现在我被卡住了。每当我尝试创建地图时，都会显示全局地图，或者根本不显示任何地图。到目前为止我所做的工作是否有错误，或者我下一步是否做错了？预先感谢。