[R] How do I juxtapose two lattice graphs with common X axes such that the X axes line up?

2010-01-20 Thread George Chen 
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.

Re: [R] How do I juxtapose two lattice graphs with common X axes such that the X axes line up?

2010-01-20 Thread baptiste auguie 
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.

Re: [R] How do I juxtapose two lattice graphs with common X axes such that the X axes line up?

2010-01-20 Thread Sundar Dorai-Raj 
Try googling latticeExtra x.same for some examples. Here's one:

http://www.mail-archive.com/r-help@r-project.org/msg39048.html

On Wed, Jan 20, 2010 at 9:44 AM, George Chen glc...@stanford.edu wrote:

 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.


[[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.