Please look at the likert function in the HH package.
?likert
has many examples.
Here is the code for your query

## install.packages("HH") ## if necessary
library(HH)
twobar <- data.frame(neg=c(8,0,9,2), pos=c(12,9,0,4))
likert(twobar)

Rich

On Thu, May 31, 2012 at 9:30 AM, Sarah Goslee <sarah.goslee@gmail.com>wrote:

> Hi Roberto,
>
> The R Graph Gallery is an excellent resource for this kind of
> question. You can browse the thumbnails until you find something that
> leads you in the right direction, like maybe:
>
> http://addictedtor.free.fr/graphiques/RGraphGallery.php?graph=136
>
> Sarah
>
> On Thu, May 31, 2012 at 7:18 AM, Roberto Brunelli
> <roby.brunelli@gmail.com> wrote:
> > I would like to create a 'bar' plot with the following look
> >
> >            -            0         +
> > -------------------------+----------------------
> >            oooooooo************
> >                                    *********
> >   ooooooooo
> >                        oo****
> >
> > where the positive and negative parts of the bar
> > should have a different color.
> >
> > Is there any function/package supporting this kind of plot?
> >
> > Thanks a lot,
> >
> > Roberto
> >
>
> --
> Sarah Goslee
> http://www.functionaldiversity.org
>
> ______________________________________________
> R-help@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<http://www.r-project.org/posting-guide.html>
> and provide commented, minimal, self-contained, reproducible code.
>

	[[alternative HTML version deleted]]

