Message-ID: <AB40B9DA-4313-44F0-9892-9405378CD542@comcast.net>
Date: 2011-04-08T12:29:27Z
From: David Winsemius
Subject: xyplot, groups and colors
In-Reply-To: <20110408120656.GA5932@maker>
On Apr 8, 2011, at 8:06 AM, Philipp Pagel wrote:
>
> Dear ExpeRts,
>
> I am trying to plot a bunch of growth curves and would like to get
> some more control over groups and line colors than I seem to have.
>
> Example:
>
> # make some data
> dat <- Orange
> dat$group <- ifelse(dat$Tree%in%c('1','4','5'), 'A', 'B')
>
> # plot
> xyplot(circumference~age, dat, groups=group)
>
> # now use lines to make the growth curve more visible
> xyplot(circumference~age, dat, groups=group, type='l')
> # ugly, because of the 'return' lines
>
> # to fix this set groups to Tree
> xyplot(circumference~age, dat, groups=Tree, type='l')
> # better, but now each Tree has its own color
>
> Of course I can now use the col argument to manually assign the colors
> by group but is there a more elegant way that I missed?
You aren't saying what you want but I am guessing it is a color-less
plot:
xyplot(circumference~age, dat, groups=Tree, type='l',
par.settings=simpleTheme(col="grey"))
trellis.par.set can also be used to specify this globally.
--
David Winsemius, MD
West Hartford, CT