Re: [R] adding lines to a barchart

From: Deepayan Sarkar <deepayan.sarkar_at_gmail.com>
Date: Wed, 19 Dec 2007 12:31:59 -0800

On 12/19/07, Spilak,Jacqueline [Edm] <Jacqueline.Spilak_at_ec.gc.ca> wrote:
> Hi all
> I can't find what I am looking for so I am asking here. I have a
> dataset that looks something like this.
>
> Year season percent_below
> 2000 Winter 6.9179870
> 2000 Spring 1.6829436
> 2000 Summer 1.8463501
> 2000 Autumn 3.8184993
> 2001 Winter 2.8832806
> 2001 Spring 2.5870511
> 2001 Summer 0.0000000
> 2001 Autumn 4.7248240
> 2002 Winter 4.4532238
> 2002 Spring 3.7468846
> 2002 Summer 1.0784311
> 2002 Autumn 3.7061533
>
> I have plotted this nicely using
> barchart(percent_below ~ factor(Season, levels=Season), data= dataset1,
> group=Year)
> This gives me a barplot by season with each year shown in that season.
> Now the tricky part. My data is from 2000 to 2007 and 2007 is an
> important year. I have an upper and lower limit for percent_below for
> 2007 for each season. I would like to add the upper and lower limit of
> 2007 as a black line to each season. The upper and lower limit will be
> different for each season. This is being done so for a comparison so I
> need it done this way.

I would suggest a slightly different format. Here's an example with one set of limits; you can add another set similarly. If you really want a single panel, you could use panel.segments().

barchart(percent_below ~ factor(Year) | factor(season, levels=unique(season)),

         data= dataset1, origin = 0, layout = c(4, 1),
         upper_2007 = c(6, 4, 5, 3),
         panel = function(..., upper_2007) {
             panel.abline(h = upper_2007[packet.number()])
             panel.barchart(...)
         })

-Deepayan



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. Received on Wed 19 Dec 2007 - 20:35:56 GMT

Archive maintained by Robert King, hosted by the discipline of statistics at the University of Newcastle, Australia.
Archive generated by hypermail 2.2.0, at Fri 21 Dec 2007 - 19:31:15 GMT.

Mailing list information is available at https://stat.ethz.ch/mailman/listinfo/r-help. Please read the posting guide before posting to the list.