salvataggio di un'immagine in ggplot & ggmap

Question

ho salvata un'immagine utilizzando funzione ggsave che cerca come sotto

ma voglio avere output come questo

 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) 

ho cercato di x rimossi e valori dell'asse y, ma il problema è che l'immagine ha uno sfondo bianco sul pannello, ma voglio solo l'immagine della trama.

Answer 1

Nella funzione ggmap(), è necessario extent = "device". Vedi ?ggmap::ggmap per ulteriori opzioni.

Quanto segue fornirà il risultato desiderato.

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)