我知道我可以在绘图时指定高宽比,例如plot(x,y,asp=5)。在允许自动缩放(如在plot(x,y)中)之后,是否有任何方法来检索高宽比?我问的原因是我在玩text(x,y,'mystring',srt=local_slope),在那里我根据底层曲线和感兴趣的x值计算local_slope。麻烦的是,对于asp!=1,这将使文本以与我绘制的数据集的显示斜率不同的角度旋转。示例:
x<- -10:10
y<- x^2
plot(x,y,t='l',asp=0.1)
# the slope at x=1 is 2 but the default plot aspect ratio is far from 1:1
text(1,1,'foo',srt= 180/pi*atan(2) ) #ugly-looking
text(-1,1,'bar',srt= (180/pi*atan(2/10))) #better发布于 2014-01-21 16:36:06
x<- -10:10
y<- x^2
plot(x,y,t='l',asp=0.1)
### the slope at x=1 is 2 but the default plot aspect ratio is far from 1:1
text(1,1,'foo',srt= 180/pi*atan(2) ) #ugly-looking
text(-1,1,'bar',srt= (180/pi*atan(2/10))) #better绘制区域的宽度和高度(以英寸为单位)。
ff <- par("pin")
ff[2]/ff[1] ## 1.00299现在手动调整情节大小..。
ff <- par("pin")
ff[2]/ff[1] ## 0.38您也可以使用par("usr")来排序用户单元中的高宽比,但是我还没有计算出正确的比率集合.MASS::eqscplot的核心也可能具有启发性。
https://stackoverflow.com/questions/21263748
复制相似问题