R 如何消除ggplot2地图周围的空白

如何消除图像周围的空白？假设我有这个代码：

library(OpenStreetMap)
library(ggplot2)
library(maps)
library(tidyverse)
mp <- openmap(c(28,-115), c(50,-67),zoom=6,'stamen-watercolor')
states_map <- map_data("state") %>% filter(lat > 28 & lat < 50 & long > -115 & long < -67)
states_map_merc <- as.data.frame(projectMercator(states_map$lat,states_map$long))
states_map_merc$group <- states_map$group
counties_map <- map_data("county") %>% filter(lat > 28 & lat < 50 & long > -115 & long < -67)
counties_map_merc <- as.data.frame(projectMercator(counties_map$lat,counties_map$long))
counties_map_merc$group <- counties_map$group

a <- OpenStreetMap::autoplot.OpenStreetMap(mp,expand=FALSE) + 
    geom_polygon(data=states_map_merc, aes(x=x,y=y,group=group), fill="black",colour="white",alpha=0, size=.7) + 
    geom_polygon(data=counties_map_merc, aes(x=x,y=y,group=group), fill="black",colour="white",alpha=0, size=.2) +
    theme_void() +
    theme(plot.caption = element_text(size=11)) +
    geom_text(x=-10018754, y=3299499, label="Text.") +
    expand_limits(x=0, y=0) +
    scale_x_continuous(0) +
    scale_y_continuous(0)
ggsave(a, filename="map_static2.png")

---

它把它修好了。@Jaap的链接就是它。

也许这会有所帮助：您的代码生成一个没有任何帧修饰的地图。这让我觉得你是在通过网页或应用程序显示地图。鉴于地图本身是无框架的，这意味着框架和空白是通过HTML或类似的方式添加的。所以我们需要看到一个可复制的例子。这还不是一张。@Limey，由于StackOverflow的文件大小限制，我拍了一张截图。这就是图像看起来如此的原因。

ggsave

命令生成上面没有灰色边框的图像。我明白你的意思了吗？明白。您的代码生成一个没有边框的绘图。试试看！我试过了，它仍然有边界。但我使用@Jaaps answer中的想法对其进行了修改，效果很好。看看问题的答案。谢谢你的帮助！

scale_x_continuous(expand=c(0,0)) +
scale_y_continuous(expand=c(0,0)) 
ggsave(a, filename="map_static3.png", width=8, height=4.64)