Description Usage Arguments Value Examples
Add a portable theme for SIR ternary plots
1 |
... |
additional arguments to pass |
theme to add to ggtern plots
1 2 3 4 5 6 7 8 9 10 | library(ggplot2)
library(dplyr)
library(ggtern)
EpiCompare::hagelloch_raw %>% filter(SEX %in% c("male", "female")) %>%
ggplot(., aes(y = tI, z = tR, color = SEX)) +
geom_aggregate() + coord_tern() +
labs(x = "S", y = "I", z = "R",
color = "Gender") +
theme_sir()
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.