multiple-barcharts

my.data <- structure(c(0, 2.5, 0, 0, 6, 1, 1, 0, 1, 0, 5, 3, 6, 14, 2.5,
10, 33, 25, 15, 18, 16.5, 11, 6, 8, 30, 19, 33, 34, 5, 17.5), .Dim = c(6L,
5L), .Dimnames = list(c("Verksamhetsgrupper", "Förbundsstyrelsen",
"Lokalföreningar (styrelser)", "Konsulenterna", "Representantskapet",
"Centrala teamet"), c("Mycket litet \n förtroende", "Ganska litet \n förtroende",
"Varken eller", "Ganska stort \n förtroende", "Mycket stort \n förtroende"
)))
par(mar = c(2,2,0,0), cex = 0.8)
barplot(my.data, beside = T, col = gray.colors(6))
legend("topleft", attr(my.data, "dimnames")[[1]], fill = gray.colors(6), inset=c(0.1, 0.1))

comments powered by Disqus

Back to the index

Blog roll

R-bloggers, Debian Weekly

---

Last modified: oktober 17, 2019