在R中的sp软件包中打印地图(更改地图的比率纵横比)

在R中的sp软件包中打印地图(更改地图的比率纵横比),r,plot,R,Plot,我在显示空间对象时遇到以下问题: Reproducible example: x<-c(1:2000) y<-c(rep(1:20, each=100)) xy <- cbind(x,y) S <- SpatialPoints(xy) plot(S) 但我不明白第3行和第4行是做什么的,我试着玩弄这些值,但没有用。有人能提供一些建议吗?谢谢。刚刚发现asp有效,因此plot(S,asp=0)解决了这个问题 pin<-par("pin") dxy<-ap

我在显示空间对象时遇到以下问题:

Reproducible example:

x<-c(1:2000)
y<-c(rep(1:20, each=100))
xy <- cbind(x,y)
S <- SpatialPoints(xy)
plot(S)

但我不明白第3行和第4行是做什么的,我试着玩弄这些值,但没有用。有人能提供一些建议吗?谢谢。

刚刚发现
asp
有效,因此
plot(S,asp=0)
解决了这个问题

 pin<-par("pin")
 dxy<-apply(bbox(S), 1, diff)
 ratio<-dxy[0]/dxy[2]
 par(pin=c(ratio*pin[0.1], pin[1]), xaxs="i", yaxs="i")
 plot(S, pch=0.1)