2012-07-21 30 views
6

tôi đã tiết kiệm được một hình ảnh sử dụng chức năng ggsave trông như sau enter image description herelưu hình ảnh trong ggplot & ggmap

nhưng tôi muốn có đầu ra như thế này enter image description here

 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) 

tôi đã cố gắng để x loại bỏ và y giá trị trục nhưng vấn đề là hình ảnh có nền trắng ở bảng điều khiển nhưng tôi chỉ muốn hình ảnh lô.

Trả lời

4

Trong chức năng ggmap(), bạn cần extent = "device". Xem ?ggmap::ggmap để có thêm tùy chọn.

Sau đây sẽ cho kết quả bạn muốn.

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)