In seabbs/tbinenglanddataclean: Cleans and Munges Tuberculosis and Demographic Data for England

Required Packages

library(tbinenglanddataclean)
library(kableExtra)
library(rlang)
library(ggplot2)

TB Interventions

tb_interventions_timeline %>% 
  set_names(c("Year",
              "Intervention",
              "Type",
              "Line",
              "Detail")) %>% 
  knitr::kable(
    caption.short = "A timeline of interventions against TB",
    caption = "A timeline of interventions against TB. Antibiotics used to treat TB are commonly given together, with those with the fewest side effects given first. Second line antibiotics are then used if the initial treatment fails or tests show the strain is multiply drug resistant. BCG - Bacillus Calmette–Guérin; TB – Tuberculosis; MRSA - Methicillin-resistant Staphylococcus aureus; DOTS - Directly Observed Treatment Short-course", booktabs = TRUE, longtable = TRUE, escape = FALSE) %>% 
  kable_styling(font_size = 8, latex_options = c("repeat_header")) %>% 
  column_spec(5, width = "10cm") %>% 
  kable_styling(latex_options = "hold_position") %>% 
  landscape()

TB Notifications

plot_historic_tb_ew() + theme(legend.position = "top")

Pulmonary Vs. Extra-Pulmonary TB

plot_historic_prop_pul_tb() + theme(legend.position = "top")

seabbs/tbinenglanddataclean documentation built on July 12, 2019, 2:54 p.m.