powered by
paretochart(x, main, ylab = "Frequency", xlab = "", cumperc.by = 20, cex = 0.8, ...)
x <- rep(LETTERS[1:9], c(200, 100, 50, 25, 12, 6, 3, 2, 1)) paretochart(x)
Run the code above in your browser using DataLab