Sure but which way? > dput(mydata) structure(list(opinion = structure(c(4L, 5L, 1L, 2L, 3L), .Label = c("50-50 Chance", "A good chance", "Almost certain", "Almost no chance", "Probably Not" ), class = "factor"), female = c(96, 426, 696, 663, 486), male = c(98, 286, 720, 758, 597)), .Names = c("opinion", "female", "male"), row.names = c(NA, -5L), class = "data.frame")
> with(mydata, barplot(cbind(female, male), ylim=c(0, 900), beside=TRUE, legend.text=opinion, args.legend=list(x="top", ncol=3))) > with(mydata, barplot(t(cbind(female, male)), names.arg=opinion, beside=TRUE, cex.names=.8, legend.text=TRUE)) ---------------------------------------------- David L Carlson Associate Professor of Anthropology Texas A&M University College Station, TX 77843-4352 > -----Original Message----- > From: r-help-boun...@r-project.org [mailto:r-help-bounces@r- > project.org] On Behalf Of darnold > Sent: Monday, August 20, 2012 1:01 PM > To: r-help@r-project.org > Subject: [R] Beside Barplot > > All, > > Is there a way to get a barplot with beside for the following without > reshaping mydata? > > > opinion <- c("Almost no chance", "Probably Not","50-50 Chance","A good > chance","Almost certain") > female <- c(96,426,696,663,486) > male <- c(98,286,720,758,597) > mydata<-data.frame(opinion,female,male) > > Thanks > > David > > > > -- > View this message in context: http://r.789695.n4.nabble.com/Beside- > Barplot-tp4640807.html > Sent from the R help mailing list archive at Nabble.com. > > ______________________________________________ > 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. ______________________________________________ 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.