Skip to content

Instantly share code, notes, and snippets.

@ryanburge

ryanburge/RStudio_ct_selection_covid.R

Created August 18, 2021 23:48
Show Gist options
  • Save ryanburge/6b5cebaf8f5b59b2d1f829ca8d8a4ee9 to your computer and use it in GitHub Desktop.
Save ryanburge/6b5cebaf8f5b59b2d1f829ca8d8a4ee9 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
RStudio_ct_selection_covid.R
compare %>%
ggplot(., aes(x = date, y = r7, group = county, color = county, linetype = county)) +
geom_line() +
scale_color_gdocs() +
theme_rb()+
theme(plot.subtitle = element_text(size = 10)) +
theme(legend.position = c(.2, .8)) +
labs(x = "Date", y = "Cases Per 1000 Per Day", title = "Comparing COVID Cases in Southern Illinois Counties",
subtitle = "",
caption = "Data from Local County Public Health Dept.") +
ggsave("Z://covid/covid10.png", type = "cairo-png", width = 7)
# https://git.io/J0Vny
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment