[R] Grouped bwplots?

[Deepayan Sarkar]

On 2/20/09, Fredrik Karlsson <dargosch at gmail.com> wrote:
> Dear list,
>
> I am sorry for asking you this, but I am trying to do again what I
> thought I have done before, although this time it does not work.
>
> So, given the data set:
>
>> testdf <- data.frame(grfak=sample(c("One","Two"),size=100,replace=TRUE),
>> panfak= sample(c("Yes","No"),size=100,replace=TRUE), xfak=
>> sample(c("Yep","Nope"),size=100,replace=TRUE),  d=rnorm(100))
>
> I would like to do:
>
>> bwplot(d ~ xfak | panfak,data=testdf, groups= grfak)
>
> where the groups argument makes a difference (as in dividing each box
> into two by group).
> Is this possible to do?

Here's a start:

bwplot(d ~ xfak | panfak,data=testdf, groups= grfak,
       panel = panel.superpose,
       panel.groups = panel.bwplot,
       fill = "transparent")

You will probably want to write a custom panel.groups function to get
more control over graphical parameters.

-Deepayan