## Sorry, typo in my last email.  "frac" is the correct spelling, not
"fraction"
## RIch

tmp <- data.frame(trat=letters[1:3], y=rnorm(3), x=1:3)

xyplot(y ~ x | trat, data=tmp)

strip.levelnames <- c(expression(H[2]*O), expression(x^2+y^2),
expression(frac(x^3, 1+x^3)))

xyplot(y ~ x | trat, data=tmp,
       strip=strip.custom(factor.levels=strip.levelnames))

xyplot(y ~ x | trat, data=tmp,
       strip=strip.custom(factor.levels=strip.levelnames),
       par.strip.text=list(lines=3), layout=c(3,1))

	[[alternative HTML version deleted]]

