フレキシブル対角線プロットR

Question

どの座標範囲でどのように対角線を（左下から右に 右角）、 にプロットすることができますか？

例えば

> plot(c(-2,3), c(-1,5), type = "n", xlab="x", ylab="y", asp = 1) 

又は

> plot(c(0,1000), c(0,334), type = "n", xlab="x", ylab="y", asp = 1) 

Iは、以下でablineを試みたが失敗しました：

> abline(0,1,col="red") 

Answer 1

現在のプロットエリアの制限はpar()$usrです。

lines(par()$usr[1:2], par()$usr[3:4])