ds %>%
filter(location %in% (ds$location %>% unique %>% sample(10))) %>%
mutate(location=factor(location,
levels=(location %>% unique() %>% sort() %>% rev()))) %>%
ggplot(aes(location, temp_3pm, fill=location)) +
stat_summary(fun="mean", geom="bar") +
theme(legend.position="none") +
coord_flip()
Labels will sometimes appear in the reverse order to
that required. In the example below we explicitly reorder the levels
to ensure the plot labels are in a more natural order for the human
reader. We use dplyr::mutate() within a pipeline to create a
factor with the levels in the desired order passing that on to
ggplot2::ggplot().
|