Skip to content

Commit

Permalink
Fig2 fix labels
Browse files Browse the repository at this point in the history
  • Loading branch information
Rob committed Apr 5, 2020
1 parent d9a84cf commit 7133b0c
Show file tree
Hide file tree
Showing 5 changed files with 2 additions and 4 deletions.
Binary file modified Figure1.pdf
Binary file not shown.
Binary file modified Figure2.pdf
Binary file not shown.
Binary file modified Figure2.png
Loading
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
Binary file modified FigureS1.pdf
Binary file not shown.
6 changes: 2 additions & 4 deletions R/nyt_county.R
Original file line number Diff line number Diff line change
Expand Up @@ -158,17 +158,15 @@ pop_today = cv_new %>% filter(date==last_day) %>% filter(pop < 8000000)
theme_minimal() +
theme(legend.position = 'none') +
xlab('Human Population (millions)') +
ylab('SARS-CoV2 Cases') +
ggtitle("Case Count and Locality Population")
ylab('SARS-CoV2 Cases')
)

(pop_scale = ggplot(data=pop_today) +
geom_point(aes(x=pop/1000000, y=(cases/pop), alpha=0.2)) +
theme_minimal() +
theme(legend.position = 'none') +
xlab('Human Population (millions)') +
ylab('SARS-CoV2 Cases / Total Human Population') +
ggtitle("Case Rate (per capita) and Locality Population")
ylab('Population Scaled Cases')
)

pop_map = plot_grid(pop_raw, pop_scale, nrow=2, ncol=1, labels='AUTO')
Expand Down

0 comments on commit 7133b0c

Please sign in to comment.