Гибкая диагональная линия в 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)

Я пробовал аблайн со следующим, но не смог:

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

Answer 1

Пределы текущей площади участка указаны в par()$usr.

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