Create a gist now

Instantly share code, notes, and snippets.

What would you like to do?
goats %>%
group_by(year) %>%
select(-ccode, -country.name) %>%
summarise(value = mean(value)) %>%
ggplot(aes(x = year, y = value)) +
geom_boxplot(data = goats, aes(group = year)) +
geom_smooth(method = "lm")
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment