On Wed, 2010-08-25 at 11:30 -0400, RICHARD M. HEIBERGER wrote:
> Kay,
>
> doe this do what you want?
>
>
> dotplot(y1+y2 ~ facs$Treatment|facs$Sites,
> outer=TRUE,
> scales = list(x = list(rot = 90, tck=c(1,0))),
> ylab=c("y1", "y2"),
> xlab=c("Site 1", "Site 2"),
> strip=FALSE)
This would be better, to avoid abusing the poor R formula handling
sugar:
dotplot(y1 + y2 ~ Treatment | Sites, ## no $
## Supply a data argument
data = facs,
## as before
outer=TRUE,
scales = list(x = list(rot = 90, tck=c(1,0))),
ylab=c("y1", "y2"),
xlab=c("Site 1", "Site 2"),
strip=FALSE)
G
>
> On Wed, Aug 25, 2010 at 11:04 AM, Kay Cichini
<kay.cich...@uibk.ac.at>wrote:
>
> >
> > hello,
> >
> > i want to stack two lattice plots beneath each other using one x-axis and
> > sharing the same text-panels,
> > like:
> > #####################################################################
> > library(lattice)
> >
> > y1 <- rnorm(100,100,10)
> > y2 <- rnorm(100,10,1)
> > facs<-expand.grid(Sites=rep(c("Site I","Site
II"),25),Treatment=c("A","B"))
> > pl1<-dotplot(y1 ~ facs$Treatment|facs$Sites,
> > scales = list(x = list(rot = 90, tck=c(1,0))))
> > pl2<-dotplot(y2 ~ facs$Treatment|facs$Sites,
> > scales = list(x = list(rot = 90, tck=c(1,0))))
> >
> > print(pl1, split=c(1,2,1,2), more=TRUE)
> > print(pl2, split=c(1,1,1,2))
> > #####################################################################
> >
> > but as said, ideally the plots should be stacked with only the lower plot
> > giving the x-axis annotation
> > and only the upper plot with text-panels.
> >
> > thanks a lot,
> > kay
> >
> > -----
> > ------------------------
> > Kay Cichini
> > Postgraduate student
> > Institute of Botany
> > Univ. of Innsbruck
> > ------------------------
> >
> > --
> > View this message in context:
> >
http://r.789695.n4.nabble.com/lattice-help-required-tp2338382p2338382.html
> > Sent from the R help mailing list archive at Nabble.com.
> >
> > ______________________________________________
> > 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<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.
--
%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%
Dr. Gavin Simpson [t] +44 (0)20 7679 0522
ECRC, UCL Geography, [f] +44 (0)20 7679 0565
Pearson Building, [e] gavin.simpsonATNOSPAMucl.ac.uk
Gower Street, London [w] http://www.ucl.ac.uk/~ucfagls/
UK. WC1E 6BT. [w] http://www.freshwaters.org.uk
%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%~%
______________________________________________
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.
