On 09/23/2010 09:38 PM, Richard DeVenezia wrote:
New to R. I am trying to create a simple xy plot wherein the line segment color is determined by a categorical columnThe following does not change colors for me, probably because I don't quite have a handle on either functions or value mapping syntax. ---------- time<- c(1, 2, 3, 7,10,11,14,16,20) pressure<- c(0,10,20,20,50,18,60,65,90) status<- c(0, 0, 1, 1, 1, 0, 3, 3, 3) measures<- c(time,pressure,status) attach(measures) statusColor<- function (x) { if (x==0) return ("green") if (x==1) return ("orange") if (x==2) return ("pink") if (x==3) return ("red") } par(mfrow=c(3,2)) plot(time,pressure,type="l") plot(time,pressure,type="l") plot(time,pressure,type="l") plot(time,pressure,type="l") plot(time,pressure,type="l",col=statusColor(status)) plot(time,pressure,type="l") ---------- Warning message: In if (x == 0) return("green") : the condition has length> 1 and only the first element will be used
Hi Richard, Look at the color.scale.lines function in the plotrix package. Jim ______________________________________________ [email protected] 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.
