r - 将图像保存在 ggplot 和 ggmap 中

Question

我已经使用 ggsave 函数保存了一张图像，如下所示

但我想有这样的输出

       al1 <- get_map(location = c(lon = -86.304474, lat = 32.362563), zoom = 11, maptype = 'terrain')

      lon<--86.304474
      lat<-32.362563
      df<-data.frame(lon,lat)
      a+ggplot(df)
      ggmap(al1)+geom_point(data=df,aes(x=lon,y=lat),size=2)

我试图删除 x 和 y 轴值，但问题是图像在面板上有白色背景，但我只想绘制图像。

Answer 1

在ggmap()函数中，您需要extent = "device". 查看?ggmap::ggmap更多选项。

以下将给出您想要的结果。

library(ggmap)
al1 <- get_map(location = c(lon = -86.304474, lat = 32.362563), zoom = 11, maptype = 'terrain')

lon<--86.304474
lat<-32.362563
df<-data.frame(lon,lat)
      #a+ggplot(df) # Not sure what you intend here
ggmap(al1, extent = "device")+geom_point(data=df,aes(x=lon,y=lat),size=2)