ok, found a workaround using 'useOuterStrips':
#Example:
require(lattice)
#require(latticeExtra)
f <- data.frame(a = c(1:40), b = c(1:10, 20:29, 990:999, 20:29),
d = c(rep("A", 20), rep("B", 20)),
e = c(rep("X", 10), rep("Y", 10), rep("X", 10), rep("Y",
10)))
useOuterStrips(xyplot(b ~ a | d + e, f,
scales = list(y = list(relation = "free", rot = 0),
x = list(alternating = F)),
aspect = 1.8, layout = c(2, 2),
axis = function(side, line.col = "black", ...){
if(side %in% c("left","bottom")) {
axis.default(side = side, line.col = "black", ...)
}
},
),
strip.left = F,
strip = strip.custom(style = 1, bg = "transparent",
factor.levels = c("This is centered", "Also"))
)
###
--
View this message in context:
http://r.789695.n4.nabble.com/lattice-column-titles-using-xlab-top-in-multipanel-xyplot-tp4659610p4659990.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
and provide commented, minimal, self-contained, reproducible code.
