相关疑难解决方法(0)

如何在ggplot2地图上绘制条形图

我也发现了类似的答案像这样的问题,但大部分都是使用包rworldmap,ggmap,ggsubplotgeom_subplot2d.例如,在此处此处查看.

我想知道如何将其他ggplot对象(如条形图)绘制到地图上,这是从shapefile创建的.我正在使用的那个可以在这里下载.

编辑

正如@beetroot正确指出的那样,可以在上面发布的链接下下载的新文件发生了显着变化.因此,调整shapefile等的名称.

library(rgdal)
library(ggplot2)
library(rgeos)
library(maptools)

map.det<- readOGR(dsn="<path to your directory>/swissBOUNDARIES3D100216/swissBOUNDARIES3D/V200/SHAPEFILE_LV03", layer="VECTOR200_KANTONSGEBIET")
map.kt <- map.det[map.det@data$KANTONSNUM=="CH01000000"|map.det@data$KANTONSNUM=="CH19000000",]


#get centroids
map.test.centroids <- gCentroid(map.kt, byid=T)
map.test.centroids <- as.data.frame(map.test.centroids)
map.test.centroids$KANTONSNR <- row.names(map.test.centroids)

#create df for ggplot
kt_geom <- fortify(map.kt, region="KANTONSNUM")

#Plot map
map.test <- ggplot(NULL)+
        geom_polygon(data=kt_geom, aes(long, lat, group=group), fill="white")+
        coord_fixed()+
        geom_path(data=kt_geom, color="gray48", mapping=aes(long, lat, group=group), size=0.2)+
        geom_point(data=map.test.centroids, aes(x=x, y=y), size=9, alpha=6/10)

mapp
Run Code Online (Sandbox Code Playgroud)

这导致了这样的地图.到现在为止还挺好. 在此输入图像描述

但是,我在组合两个地图时遇到了困难map.test,例如地图,例如,这个:

geo_data <- …
Run Code Online (Sandbox Code Playgroud)

r ggplot2 gridextra r-grid

11
推荐指数
1
解决办法
4035
查看次数

标签 统计

ggplot2 ×1

gridextra ×1

r ×1

r-grid ×1