[R] L-shaped boxes with lattice graphs?

[John Maindonald]

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.maindonald at 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