
Hi,
 
I would like to draw a box at each corner of lower 10% and upper 10% in the scatter plot on(0,1)*(0,1)  to indicate the lower and upper tail.  I hope somebody can help me.
 
Here is my code:
## scatter plot
plot(hume_uni[,2],beec_uni[,2], pch=19, xlab="Hume_uni", ylab="Beec_uni", col= "blue")  
title(main="Scatter plot of uniformised data of Hume and Beechworth", font.main= 4)
abline(lm(hume_uni[,2]~beec_uni[,2]), col= "red").
 
Thank you so much fro any help given.




      
	[[alternative HTML version deleted]]


