Hello,
If it helps...:
Lines <- "pet gender
dog male
dog female
dog male
cat female
cat female
cat male
"
d.f <- read.table(textConnection(Lines), header=T, as.is = TRUE)
d.tab<-table(d.f$pet, d.f$gender)
d.f.tab<-as.data.frame(table(d.f$pet, d.f$gender))
names(d.f.tab)<-c('pet','gender', 'Freq')
library(lattice)
histogram(
~ Freq | pet *gender, data=d.f.tab,
groups=gender, stack=T, horizontal=T
)
Regards,
Carlos Ortega
www.qualityexcellence.es
2012/1/27 Mario Giesel <rr.giesel@yahoo.de>
> Hello, R friends,
>
> I'm trying to crack this nut:
>
>
> Example Data.
>
> pet gender
> dog male
> dog female
> dog male
> cat female
> cat female
> cat male
>
> Plot Task.
>
> Horizontal 100% bars where
> y axis shows gender factor (male vs. female)
> and x axis shows percentage of kind of pets (dog vs. cat)
> so that % dogs + % cats are stacked in 1 bar and sum up to 100% (for each
> gender group 1 bar).
>
> How can this be done with ggplot2?
>
> Thanks for any comments!
>
> Mario
>
> [[alternative HTML version deleted]]
>
>
> ______________________________________________
> 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
> and provide commented, minimal, self-contained, reproducible code.
>
>
[[alternative HTML version deleted]]