如何解决将基于 ggplot 的地图导出为地理参考 pdf
有没有办法将使用 ggplot 与 ggmap 和 sf 包创建的地图导出为地理参考 pdf？我正在制作使用 ggmap 和 sf 包将底图与多边形、点和标签图层相结合的地图，是否可以将生成的地图导出为地理参考 pdf，以便在 avenza 等应用程序中使用。使用 sf 包中的 nc 示例，映射将类似于此示例。
library(tidyverse)
library(sf)
library(ggmap)
polyS <- st_read(system.file("shape/nc.shp",package="sf")) %>% st_transform(4326)
POINTS <- st_centroid(polyS)
BASEMAP <- get_map(location = unname(st_bBox(polyS)),zoom = 8)
EX_MAP <- ggmap(BASEMAP)+
geom_sf(data=polyS,inherit.aes = F,fill=NA)+
geom_sf(data=POINTS,inherit.aes = F)+
geom_sf_label(data = POINTS,nudge_y = 0.02,aes(label=NAME),size=2)
ggsave(EX_MAP,filename = "EX_MAP.pdf")
版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 dio@foxmail.com 举报，一经查实，本站将立刻删除。
