powered by
data(spatial)
str(spatial) plot(spatial) abline(0,1, col="red2")
Run the code above in your browser using DataLab