[R] Colour filling in panel.bwplot from lattice

[Rainer Hurling]

Inspired by colouring the dots of box-whisker plots I am trying to also 
fill the boxes (rectangles) with different colours. This seems not to 
work as I expected.

Looking at the help page of panel.bwplot it says: 'fill - color to fill 
the boxplot'. Obviously it is only intended to fill all boxes with only 
one colour?

Nevertheless the following example shows, that 'fill' from panel.bwplot 
is able to work with more than one colour. But this only works with one 
colour or multiples of 5 colours:


-------------------------------------------------
bp1 <- bwplot(voice.part ~ height, data = singer, main="1 color works",
               panel = function(...) {
                 panel.bwplot(col=c("yellow"),
                              fill=c("yellow"), ...)
               })

bp2 <- bwplot(voice.part ~ height, data = singer, main = "3 colors do 
NOT work",
               panel = function(...) {
                 panel.grid(v = -1, h = 0)
                 panel.bwplot(col=c("yellow","blue","green"),
                              fill=c("yellow","blue","green"), ...)
               })

bp3 <- bwplot(voice.part ~ height, data = singer, main = "5 colors do work",
               panel = function(...) {
                 panel.grid(v = -1, h = 0)
                 panel.bwplot(col=c("yellow","blue","green","pink","red"),
 
fill=c("yellow","blue","green","pink","red"), ...)
        })

plot(bp1, split=c(1,1,1,3))
plot(bp2, split=c(1,2,1,3), newpage=FALSE)
plot(bp3, split=c(1,3,1,3), newpage=FALSE)
-------------------------------------------------


Is there any chance to use more than one filling colour correctly?

Thanks in advance,
Rainer Hurling