Skip to content

Instantly share code, notes, and snippets.

@swuyts

swuyts/plot_selection.R Secret

Created June 14, 2018 17:37
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save swuyts/91e88ca6ff2a51fb7b3119677df40c94 to your computer and use it in GitHub Desktop.
Save swuyts/91e88ca6ff2a51fb7b3119677df40c94 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
plot_selection.R
table %>%
filter(selected == "YES") %>%
group_by(group) %>%
summarise(count = n()) %>%
ggplot(aes(x = group, y = count)) +
geom_col() +
coord_flip()
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment