No need to bring in so many dependencies for a simple ggplot2 marplot: ds <- stack(ds) ggplot(ds[ds$values==1,], aes(ind)) + geom_bar()
On Wed, Oct 5, 2016 at 10:17 AM, Thierry Onkelinx <thierry.onkel...@inbo.be> wrote: > Here is a ggplot2, tidyr, dplyr solution > > library(tidyr) > library(dplyr) > library(ggplot2) > ds %>% > gather() %>% > group_by(key) %>% > summarize(total = sum(value)) %>% > ggplot(aes(x = key, y = total)) + > geom_bar(stat = "identity") > > > ir. Thierry Onkelinx > Instituut voor natuur- en bosonderzoek / Research Institute for Nature and > Forest > team Biometrie & Kwaliteitszorg / team Biometrics & Quality Assurance > Kliniekstraat 25 > 1070 Anderlecht > Belgium > > To call in the statistician after the experiment is done may be no more > than asking him to perform a post-mortem examination: he may be able to say > what the experiment died of. ~ Sir Ronald Aylmer Fisher > The plural of anecdote is not data. ~ Roger Brinner > The combination of some data and an aching desire for an answer does not > ensure that a reasonable answer can be extracted from a given body of data. > ~ John Tukey > > 2016-10-05 15:55 GMT+02:00 <g.maub...@weinwolf.de>: > >> Hi Bob, >> Hi John, >> Hi readers, >> >> many thanks for your reply. >> >> I did >> >> barplot(colSums(dataset %>% select(FirstVar:LastVar))) >> >> and it worked fine. >> >> How would I do it with ggplot2? >> >> Kind regards >> >> Georg >> >> >> >> >> Von: "Fox, John" <j...@mcmaster.ca> >> An: "g.maub...@weinwolf.de" <g.maub...@weinwolf.de>, >> Kopie: "r-help@r-project.org" <r-help@r-project.org> >> Datum: 05.10.2016 15:01 >> Betreff: RE: [R] How to plot a bunch of dichotomous code variables >> in one plot using ggplot2 >> >> >> >> Dear Georg, >> >> How about barplot(colSums(ds)) ? >> >> Best, >> John >> >> ----------------------------- >> John Fox, Professor >> McMaster University >> Hamilton, Ontario >> Canada L8S 4M4 >> Web: socserv.mcmaster.ca/jfox >> >> >> > -----Original Message----- >> > From: R-help [mailto:r-help-boun...@r-project.org] On Behalf Of >> > g.maub...@weinwolf.de >> > Sent: October 5, 2016 8:47 AM >> > To: r-help@r-project.org >> > Subject: [R] How to plot a bunch of dichotomous code variables in one >> plot >> > using ggplot2 >> > >> > Hi All, >> > >> > I have a bunch of dichotomous code variables which shall be plotted in >> one >> > graph using one of their values, this is "1" in this case. >> > >> > The dataset looks like this: >> > >> > -- cut -- >> > var1 <- c(1,0,1,0,0,1,1,1,0,1) >> > var2 <- c(0,1,1,1,1,0,0,0,0,0) >> > var3 <- c(1,1,1,1,1,1,1,1,0,1) >> > >> > ds <- data.frame(var1, var2, var3) >> > -- cut -- >> > >> > I would like to have a bar plot like this >> > >> > >> > >> > * >> > * >> > * >> > * >> > * * >> > * * >> > * * * >> > * * * >> > * * * >> > * * * >> > ------------------------- >> > var1 var2 var3 >> > >> > If this possible in R? If so, how can I achieve this? >> > >> > Kind regards >> > >> > Georg >> > >> > ______________________________________________ >> > R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see >> > 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 -- To UNSUBSCRIBE and more, see >> https://stat.ethz.ch/mailman/listinfo/r-help >> PLEASE do read the posting guide http://www.R-project.org/posti >> ng-guide.html >> and provide commented, minimal, self-contained, reproducible code. >> > > [[alternative HTML version deleted]] ______________________________________________ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see 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.