R：如何缩放此图？

在由下一个代码生成的绘图中：

plot(poll$reality, poll$seker,xlab = "reality", ylab = "poll")
text(poll$reality, poll$seker, rownames(poll), cex=0.7, pos=3)
abline(0,1)

我似乎无法将轴缩放到相同的位置，因此我感觉“abline”（应该是简单的x=y）放错了位置。 我试着使用“plot.window”，但不太明白它是如何工作的，因为它没有任何影响。

尝试

绘图（…，asp=1）

。这将强制轴的比例为1:1