如何在使用 png() 保存时修复 R 中 ggplot 的大小？

Question

地图大小与纬度/经度 38.31536111,-76.55011111 与地图不同 经纬度 59.5624775,-139.7410994（在地图上绘制点）

同时用 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

如果我删除数据文件中的第一行，则地图大小与两行都存在时不同（更大）

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，现在我在之前的代码中犯了一些错误，现在已经修复了。