Description Usage Arguments Value Author(s) Examples
View source: R/figuresS1toS4.R
Construct Figure S2 from the supplementary material
1 | make_figure_S2(res = NULL)
|
res |
Data frame of results from scenarios from generate_analysis.R |
ggplot object
Joel Hellewell
1 2 3 4 5 6 7 8 9 10 11 | ## Not run:
sweep_results <- readRDS("data-raw/res.rds")
res <- sweep_results %>%
dplyr::group_by(scenario) %>%
dplyr::mutate(pext=extinct_prob(sims[[1]],cap_cases = 5000)) %>%
dplyr::ungroup(scenario)
make_figure_S1(results)
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.