Sam R. Smith a écrit :

> 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?

mynewfct = function(n=60)
{
x=runif(n)
y=runif(n)
f=cbind(x,y)
plot(f[1:20] , col='blue');
par(new=T);
plot(f[21:40] , col='red');
par(new=T);
plot(f[41:60] , col='green');
}

hih

______________________________________________
R-help@stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html

Reply via email to