Skip to content

Instantly share code, notes, and snippets.

What would you like to do?
iris %>%
group_by(Species) %>%
summarize(mean_petal_width = mean(Petal.Width)) %>%
ungroup() %>%
ggplot(aes(Species, mean_petal_width)) +
geom_col() +
theme_ipsum() +
labs(x = NULL,
y = NULL,
title = "Average petal width of irises by species")
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment