График с гибкой диагональной линией в R

Как провести диагональ по (снизу-левому-углу вверх правый-угол), в любых заданных диапазонах координат?

Например,

> 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 со следующим, но не удалось:

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