Looking at your provided example (thank you!), I'm not entirely sure what you want to put in the same column. Could you perhaps clarify -- is it something about the plot itself or the legend?
Michael > > On Thu, Oct 13, 2011 at 8:00 AM, Kenneth Roy Cabrera Torres > <krcab...@une.net.co> wrote: >> Dear R users: >> >> I want to have in the same column both symbols, line and >> points, one for a data, and the other for the model. >> >> How can I do that? >> >> Or is there other better form to show both data and model >> in the same graphic? I need to make the difference on time >> of the same subject (repeated measurements on time) >> >> >> Problem example: >> ########################################################### >> x<-1:5 >> y<-1*x+rnorm(10) >> data1<-data.frame(x,y,type=rep("data",length(x))) >> model1<-lm(y~x,data=data1) >> data2<-data.frame(x=seq(0,6,.1)) >> data2$y<-predict(model1,newdata=data2) >> data2$type<-rep("model",nrow(data2)) >> dataT<-rbind(data1,data2) >> dataT >> >> require(lattice) >> confMisc1<- simpleTheme(pch = c(19,1),lwd=c(2,1),cex=1.5, >> lty=1,col=c("black")) >> xyplot(y~x,group=type, >> type=c("p","l"), >> key=list(space="right",text=list(c("Data","Model")), >> points=list(pch=c(as.integer(NA),19)), >> lines=list(lty=c(1,0),lwd=c(2,0))), >> par.settings=confMisc1, >> panel=panel.superpose, >> distribute.type=TRUE, >> data=dataT) >> ########################################################### >> >> ______________________________________________ >> 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.