R help - Mar 2010 - strip.custom with strip on left for three conditioning variables

I want to use a strip.custom as with useOuterStrips for three conditioning
variables.
useOuterStrips restricts this to only two conditioning variables, and I
cannot figure out
how to write strip.custom properly to do this.

library(lattice)

mtcars$HP <- equal.count(mtcars$hp)

#with two factors
x2<-xyplot(mpg ~ disp | HP + factor(cyl), mtcars)
useOuterStrips(x2)


#with three factors
x3<-xyplot(mpg ~ disp | HP + factor(cyl) + factor(carb), mtcars)

update(x3,strip=strip.custom(which.given= 1),
 strip2=strip.custom(which.given= 2),
 strip.left=strip.custom(which.given=3)
)

--
Patrick Schmitz
Graduate Student
Plant Biology
1206 West Gregory Drive
RM 1500

	[[alternative HTML version deleted]]

Hi
This is untested but I think for this to work you will need to add scales  eg

scales = list(x = list(relation = "free"), y = list(relation =
"free")),

also you will need to adjust the axis limits and a few other things.
With the axis limits it is easier to start  with a small number to get 
things correct as you are dealing with lists and repeating them.
There is one or two messages in the past on this but I do not know what ones.
You will have to google for them. sorry I do not have enough time at the 
moment.


Regards

Duncan Mackay
Department of Agronomy and Soil Science
University of New England
ARMIDALE NSW 2351
Email: home: macka at northnet.com.au


At 06:00 1/04/2010, you wrote:
>I want to use a strip.custom as with useOuterStrips for three conditioning
>variables.
>useOuterStrips restricts this to only two conditioning variables, and I
>cannot figure out
>how to write strip.custom properly to do this.
>
>library(lattice)
>
>mtcars$HP <- equal.count(mtcars$hp)
>
>#with two factors
>x2<-xyplot(mpg ~ disp | HP + factor(cyl), mtcars)
>useOuterStrips(x2)
>
>
>#with three factors
>x3<-xyplot(mpg ~ disp | HP + factor(cyl) + factor(carb), mtcars)
>
>update(x3,strip=strip.custom(which.given= 1),
>  strip2=strip.custom(which.given= 2),
>  strip.left=strip.custom(which.given=3)
>)
>
>--
>Patrick Schmitz
>Graduate Student
>Plant Biology
>1206 West Gregory Drive
>RM 1500
>
>         [[alternative HTML version deleted]]
>
>______________________________________________
>R-help at 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.