On Tue, Oct 7, 2008 at 8:54 PM, Rolf Turner <[EMAIL PROTECTED]> wrote: > > I am trying to do a histogram lattice plot and I would like the > histogram to be filled with a different colour in each panel. > > Note: I want every bar in each histogram to be the same colour, > but that there should be different colours *between* histograms. > > Can't seem to get this to work. I thought that something like > the following would be a goer: > > set.seed(42) > X <- rnorm(200) > A <- factor(sample(letters[1:5],200,TRUE)) > DF <- data.frame(x=X,a=A) > print(histogram(~x|a,data=DF,col=2:6,type="count", > panel=function(x,...,subscripts,col) { > panel.histogram(x,...,col=col[subscripts]) > })) > > However it somewhat mysteriously colours the first bar/rectangle > of the histogram appropriately in the last three panels, leaving > all of the others blank, and leaves all bars blank in the first > two panels. > > Can I do what I want? How? Thanks for any advice (other than > ``Go stick your head in a pig.'' :-) )
You could always use ggplot2: library(ggplot2) qplot(X, data=DF, geom="histogram", fill=A, facets = . ~ a, binwidth=0.5) Hadley -- http://had.co.nz/ ______________________________________________ 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.