Hi,
I have the following code to 
randomly generate the 
points:
csr <-function(n=60){
x=runif(n)
y=runif(n)
f=cbind(x,y)
}
plot(csr())
 
I wonder how to code to make the first twenty points to be BLUE; second twenty points to be RED; the last twenty points to be GREEN?
 
Thanks,
Sam
 




		
---------------------------------

	[[alternative HTML version deleted]]


