Is this what you have in mind?
tmp <- data.frame(id=1:10, y1=sample(10), y2=sample(10)) tmp2 <- cbind(id=c(tmp$id, tmp$id), stack(tmp[,2:3])) barchart(values ~ id | ind, data=tmp2) If not, send an equally trivial example of what you want to the list and someone will send you an optimized set of statements for it. ______________________________________________ [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.
