0
editing out the question to remove now that it's been answered
CodePudding user response:
I'm almost sure you used barplot
, just sort
the table
.
barplot(sort(table(dat$dep_lower), decreasing=TRUE))
Data:
set.seed(216048)
dat <- data.frame(dep_lower=sample(c('beverage', 'entree', 'salad', 'giftcards'),
50, replace=TRUE))