theme_sir: Add a portable theme for SIR ternary plots

Description Usage Arguments Value Examples

View source: R/theme-sir.R

Description

Add a portable theme for SIR ternary plots

Usage

1

Arguments

...

additional arguments to pass

Value

theme to add to ggtern plots

Examples

 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()

skgallagher/EpiCompare documentation built on Sept. 14, 2021, 5:45 a.m.