Thanks, it works fine except that 7 colors are repeated twice (so that one color corresponds to two types). I tried the following but it makes things worse: the legend disappears and I get only 4 different colors: pan<-function(x,y) { panel.superpose(x,y,subscripts=coef$country,groups=coef$country, col=1:14)}
xyplot(coef$a~coef$b,group=coef$country,auto.key=T, panel="pan", xlim=c(-b_max,b_max),ylim=c(-a_max,a_max),xlab="intercept",ylab="slope") Any idea? In any case, thanks for the previous answer. Valentin Henrique Dallazuanna a écrit : > One option is use lattice: > > require(lattice) > xyplot(x~y, data=your.data, group=type, auto.key=T) > > On 25/02/2008, Valentin Bellassen <[EMAIL PROTECTED]> wrote: > >> Hello, >> >> I have a data frame with 3 vectors $x, $y, and $type. I would like to >> plot $x~$y and having different colors for the corresponding points, one >> for each level of $type. Would someone know how to do that? Is it >> possible to then generate a legend automatically? >> >> Valentin >> >> ______________________________________________ >> R-help@r-project.org mailing list >> https://stat.ethz.ch/mailman/listinfo/r-help >> PLEASE do read the posting guide http://www.R-project.org/posting-guide.html >> and provide commented, minimal, self-contained, reproducible code. >> >> > > > ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.