Skip to content
Back to formatted view

Raw Message

Message-ID: <eb555e660902202137m7af0048cp26ac3b88a85850cd@mail.gmail.com>
Date: 2009-02-21T05:37:44Z
From: Deepayan Sarkar
Subject: Grouped bwplots?
In-Reply-To: <376e97ec0902201257k74383fcdy58a40571098046ef@mail.gmail.com>

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