r - 如何在用png()保存时固定R中ggplot的大小？

Question

纬度/经度的 map 大小38.31536111，-76.55011111
与 map 不同
纬度/经度59.5624775，-139.7410994( map 上的绘图点)

同时用png()保存

如何保持相同的大小？高度和宽度还不够吗？

编辑:完整代码

library(maps)
library(ggplot2)
data <- read.csv("data.csv", header=TRUE)
lat = data$lat
long = data$long
world<-map_data('usa')
sf<-data.frame(long=long,lat=lat)
p <- ggplot(height=600, width=800) +
geom_polygon( data=world, aes(x=long, y=lat,group=group)) 
p <- p + geom_point(data=sf,aes(long,lat),colour="white",size=1)
p

数据文件:

"lat","long"
59.5624775,-139.7410994
42.38748056,-94.61803333

如果我删除数据文件中的第一行，则与同时显示两行时的 map 大小不同(更大)

Answer 1

您的代码有点困惑，因此我在下面将其修复为可复制的格式。 @joran已经给出了解决方案-您需要在png()中指定大小。

library(maps)
library(ggplot2)
#specify size here
png("world.png",height=600,width=800)

#here is a way to create very simple data frame from you coordinates
data <- read.table(textConnection("
lat long 
59.5624775 -139.7410994 
42.38748056 -94.61803333"),header=TRUE,as.is=TRUE)
long=data$long
lat=data$lat
world <- map_data('usa')
sf<-data.frame(long=long,lat=lat)
ggplot() +
geom_polygon(data=world, aes(x=long, y=lat,group=group)) + 
geom_point(data=sf,aes(long,lat),colour="white",size=1)

#this saves png in your current directory
dev.off()

编辑:Ups，现在我在前面的代码中犯了一些错误，现在已修复。