Can anyone suggest an equivalent, for lattice graphs,
of the base graphics argument bty="l"? 

NB that I am leaving off the box around the strip,
with a strip function:
stripfun <- function(which.given,which.panel,
                         factor.levels=as.expression(levlist), ...){
      panel.text(x=0, y=0.5,
                 lab = as.expression(levlist[which.panel[which.given]]), adj=0)
    }

e.g.
levlist <- list("A", "B")
xyplot(11:14 ~ 1:4 | rep(1:2,2), scales=list(x=list(alternating=c(1,1), 
relation="sliced")), strip=stripfun, layout=c(1,2)) 


John Maindonald             email: john.maindon...@anu.edu.au
phone : +61 2 (6125)3473    fax  : +61 2(6125)5549
Centre for Mathematics & Its Applications, Room 1194,
John Dedman Mathematical Sciences Building (Building 27)
Australian National University, Canberra ACT 0200.
http://www.maths.anu.edu.au/~johnm

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

Reply via email to