R help - Oct 2010 - ggplot2: how to label lines?

Hi, all,

Let's say I have some time series data--10 subjects measured 20
times--that I plot as follows:

library(ggplot2)
dat <- data.frame(subject=as.factor(rep(1:10, each=20)),
time=rep(1:20, 10), measure=as.vector(replicate(10, rnorm(20,
mean=runif(1, 0, 15), sd=runif(1, 1, 3)))))
p <- qplot(time, measure, data=dat, colour=subject, geom="line")
p

What would be the preferred way to add a single label to every line?
For instance, labels might be most readable at the beginning, end, or
peak (max value) of every line.  I could do:

p + geom_text(aes(label=subject))

But this gets messy when the labels are longer than single digits;
instead, I want a single label per line. I suppose a dataset could be
put together composed of single points and labels and then layered
atop p, but perhaps there is a more direct method.

Any help would be greatly appreciated,

Jeff.

Hi,

Have a look at the directlabels package; it does just that for lattice
and ggplot2.

HTH,

baptiste

On 26 October 2010 08:02, Jeffrey Spies <jspies at virginia.edu>
wrote:
> Hi, all,
>
> Let's say I have some time series data--10 subjects measured 20
> times--that I plot as follows:
>
> library(ggplot2)
> dat <- data.frame(subject=as.factor(rep(1:10, each=20)),
> time=rep(1:20, 10), measure=as.vector(replicate(10, rnorm(20,
> mean=runif(1, 0, 15), sd=runif(1, 1, 3)))))
> p <- qplot(time, measure, data=dat, colour=subject,
geom="line")
> p
>
> What would be the preferred way to add a single label to every line?
> For instance, labels might be most readable at the beginning, end, or
> peak (max value) of every line. ?I could do:
>
> p + geom_text(aes(label=subject))
>
> But this gets messy when the labels are longer than single digits;
> instead, I want a single label per line. I suppose a dataset could be
> put together composed of single points and labels and then layered
> atop p, but perhaps there is a more direct method.
>
> Any help would be greatly appreciated,
>
> Jeff.
>
> ______________________________________________
> R-help at 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.
>

baptiste auguie <baptiste.auguie <at> googlemail.com> writes:
> 
> Hi,
> 
> Have a look at the directlabels package; it does just that for lattice
> and ggplot2.
> 
  Note that this package is on r-forge, not CRAN

http://directlabels.r-forge.r-project.org/  [very nice examples]
install.packages("directlabels",repos="http://r-forge.r-project.org")