I recommend the panel function from the HH package
## install.packages("HH") ## if necessary
library(HH)
bwplot(b~x|a,data=DF, panel=panel.bwplot.intermediate.hh,
col = c("darkorange1","limegreen","magenta"))
Rich
On Sun, Apr 7, 2013 at 4:45 PM, Concha Bielza <[email protected]> wrote:
> Dear all,
>
> I would like to have the same color for the all boxplots from the same
> panel, but my code below shows the two colors alternating. Thanks!
>
> set.seed(42)
> D1 <- rnorm(200)
> D2 <- factor(sample(letters[1:2],**200,TRUE))
> D3 <- factor(sample(letters[3:5],**200,TRUE))
> DF <- data.frame(x=D1,a=D2,b=D3)
> print(bwplot(b~x|a,data=DF,**col=c("black","black"),
> par.settings = list(box.rectangle =
> list(fill=c("darkorange1","**limegreen"))),
> panel=function(x,...,col) {
> panel.bwplot(x,...,col=col[**packet.number()])
> }
> )
> )
>
> Thanks,
> Concha
>
> ______________________________**________________
> [email protected] mailing list
> https://stat.ethz.ch/mailman/**listinfo/r-help<https://stat.ethz.ch/mailman/listinfo/r-help>
> PLEASE do read the posting guide http://www.R-project.org/**
> posting-guide.html <http://www.R-project.org/posting-guide.html>
> and provide commented, minimal, self-contained, reproducible code.
>
[[alternative HTML version deleted]]
______________________________________________
[email protected] 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.