I would like to use a mapping to name panel strips. Directly using mapping
table does not work. What is the problem here?
my.df <- data.frame(x = rnorm(100, mean = 0, sd = 2), name = "A")
my.df <- rbind(my.df, data.frame(x = rnorm(100, mean = 0, sd = 4), name = "B"))
my.df <- rbind(my.df, data.frame(x = rt(100, 3), name = "C"))
my.df <- rbind(my.df, data.frame(x = runif(100, min = -3, max = 3), name = "D"))
library(lattice)
histogram(~x | name, data = my.df)
name.dist <- data.frame(name = c("A", "B", "C", "D"), dist = c("normal",
"normal", "t", "uniform"))
dist.names <- name.dist$dist
# Below code workshistogram(~x | name, data = my.df, strip =
strip.custom(factor.levels = c("normal", "normal", "t", "uniform")))
# Below code does not workhistogram(~x | name, data = my.df, strip =
strip.custom(factor.levels = dist.names))
[[alternative HTML version deleted]]
______________________________________________
R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see
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.
