Dear all, Thanks all of u for your help. Now I've another similar problem. I want to plot within the same plot, different lines, each one in a different color depending on the factor level. I've been able to do it like this, but if i try with rainbow colors it doesn't work. Can anybody help me with rainbow colors, or with colors that you choose, not the ones chosen by R.
tmp1 <- lm(y ~ x + factor) plot(x, y, xlab = "x", ylab = "y", col =factor , bty='L') legend(locator(1), legend = c("level 1 factor", "level 2 factor","level 3 factor", "level 4 factor","level 5 factor"), col = seq.int(nlevels(factor)), lty = 1) for (i in c("level 1","level 2","level 3","level 4","level 5")) { J <- factor== i ; x1 <- x[J] ;y1 <- tmp1$fitted[J] ;Ord <- order(x1) ; lines(x1[Ord], y1[Ord], col=factor[J])} What it doesn't work: ... plot(x,y, xlab = "x", ylab = "y", col=rainbow(nlevels(factor))[factor]) legend ... for (i in c("level 1","level 2","level 3","level 4","level 5")) { J <- factor== i ; x1 <- x[J] ;y1 <- tmp1$fitted[J] ;Ord <- order(x1) ; lines(x1[Ord], y1[Ord], col=*rainbow*(nlevels(factor))[J]) } Find attached a sample of my data http://r.789695.n4.nabble.com/file/n4407112/dfexamp.dat dfexamp.dat Thanks in advance, show crossp...@hotmail.com as u...@host.com -- View this message in context: http://r.789695.n4.nabble.com/assign-same-legend-colors-than-in-the-grouped-data-plot-tp4390641p4407112.html Sent from the R help mailing list archive at Nabble.com. ______________________________________________ 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.