[R] Beside Barplot

[David L Carlson]

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-bounces at r-project.org [mailto:r-help-bounces at r-
> project.org] On Behalf Of darnold
> Sent: Monday, August 20, 2012 1:01 PM
> To: r-help at 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 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.