Почему мой ggplot ограничен?

Question

Полученное изображение по какой-то причине ограничено. Как я могу сделать это в надлежащем масштабе. Он работал до вчерашнего дня. Я не менял ничего, и с сегодняшнего дня, фигура вытянута в.

library("maps") 
usamap <- map_data("state") 
ggplot() + 
    geom_polygon(data=usamap, aes(x=long, y=lat,group=group),colour="black", fill="white")+ 
    geom_point(data=foo1,aes(x=lon,y=lat,colour=id))+ 
    scale_color_manual(name = "CONUS",values=cols)+ 
    theme(legend.position=c(0.90, 0.20))+ 
    ggsave("useventsmap.png") 

Благодаря/

Answer 1

Если вы хотите, чтобы интервал для широты и долготы быть одинаковым для вашего участка , попробуйте добавить

+ coord_map(projection = "mercator") 

или

+ coord_fixed(ratio = 1) 

Это поможет сохранить ширину и высоту в соответствующем соотношении.