Re: [R] Same boxplot colors by panels in lattice (bwplot)

[Concha Bielza]

It works, thanks!
Concha

Try


print(bwplot(b~x|a,data=DF,col=c("black","black"),
     panel=function(x,...) {
                  pnl = panel.number()

if (pnl ==1) panel.bwplot(x,fill="darkorange1",...) else panel.bwplot(x,fill="limegreen",...)

                                            }
     )  )

Someone else may have better ideas

Duncan

At 18:52 8/04/2013, you wrote:

Dear Duncan,

I didn't explain it well.

I referred to having the same colors in the boxes to the left and other different color for all the boxes to the right!

Can you help me?

Concha

Hi Concha

You nearly got there try:

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,
             par.settings = list(box.dot = list(rep("black",3)),

superpose.line = list(col = c("darkorange1","limegreen","magenta")), box.umbrella = list(col = c("darkorange1","limegreen","magenta")), box.rectangle = list(fill=c("darkorange1","limegreen","magenta"), col = c("darkorange1","limegreen","magenta"))),

             panel=function(x,...,col) {
             panel.bwplot(x,...,col=col[packet.number()])
                                       }
            )
     )

Duncan

Duncan Mackay
Department of Agronomy and Soil Science
University of New England
Armidale NSW 2351
Email: home: mac...@northnet.com.au



At 06:45 8/04/2013, you 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

______________________________________________
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.

_

--
Prof. Concha Bielza
Department of Artificial Intelligence
Technical University of Madrid
Campus de Montegancedo, s/n
28660 Boadilla del Monte
Madrid
tel: +34 91 336 7434
fax: +34 91 352 4819
http://cig.fi.upm.es/index.php/members/65-concha-bielza

I try to answer my email quickly,
but I normally check it only once a day.

______________________________________________
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.