powered by
relativeBarPlot(data, total, labels, title, filename, ylab = "Percent", cex.names = 0.9, ymax = 100)