I have a data set like this
ID=c("A","A","A","A","A","A","A","B","B","B","B","B","B","B") s=c(1.1,2.2,1.3,1.1,3.1,4.1,4.2,1.1,2.2,1.3,1.1,3.1,4.1,4.2) d=c(1,2,3,4,5,6,7,1,2,3,4,5,6,7) t=c(-3,-2,-1,0,1,2,3,-3,-2,-1,0,1,2,3) mydata<-data.frame(cbind(as.character(ID),as.numeric(s),as.integer(d),as.numeric(t))) colnames(mydata)=c("ID","S","d","t") I want to use xyplot in lattice to draw a plot using the following code: attach(mydata) library(lattice) xyplot(S~t|ID,type="b") Now I want to label the line from -3 to -1 with one type( for example, red with "*") , the line from 0 to 3 with another type(blue with"o"), and give text label says: red "*"="FDP", blue"o"="FDL" Does anyone know how to do this? thanks, jlfmssm [[alternative HTML version deleted]] ______________________________________________ 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.