Hi, try c.trellis() from the latticeExtra package.
HTH, baptiste 2010/1/20 George Chen <glc...@stanford.edu>: > Hello, > > I would like to juxtapose two lattice graphs with common X axes such that the > X axes line up. I am using plot right now but the edges are not neat and it > would be nice if I could just draw 1 X axis and not both of them. > > Here is my code: > > > upper<-bwplot(SignalUsed~as.factor(AllNormalHitsNamesCount),data=NmlOverviewArray2, > xlab="", > ylab="Intensity of Individual Antibody Responses", > main="Intensity, Frequency, Distribution, & Quantity of Normal > Antibody Responses", > box.ratio=1, > panel = function (AllNormalHitsNamesCount,...) { > panel.bwplot(...) > } > ) > > lower<-barchart(as.vector(table(NmlOverviewArray2$AllNormalHitsNamesCount)) > > ~as.factor(as.numeric(names(table(NmlOverviewArray2$AllNormalHitsNamesCount)))), > data=NmlOverviewArray2, > ylab="Number of Individual Antibody Responses", > xlab="Occurrence of Individual Antibody Responses (Out > of 45 Normals)", > box.ratio=1) > > plot (upper, newpage=TRUE, more=TRUE, position = c(0,.15,1,1)) > plot (lower, newpage=FALSE, more=TRUE, position = c(0,0,1,.3)) > > > George > > ______________________________________________ > 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.