In ddsjoberg/bstfun: Functions for the MSK Biostatistics Department

# set chunk defaults
knitr::opts_chunk$set(echo = FALSE, message = FALSE, warning = FALSE)
set.seed({{format(Sys.Date(), format = "%Y%m%d")}})

library(biostatR); library(tidyverse)

# setting MSK ggplot theme, color palette, and gtsummary theme
theme_set(mskRvis::theme_biostat()); mskRvis::set_msk_palette()
{{(ifelse(tolower(Sys.info()[["user"]]) %in% eval(as.list(bstfun::theme_gtsummary_msk)$name), glue::glue("theme_gtsummary_msk('{tolower(Sys.info()[['user']])}')"), "theme_gtsummary_compact()"))}}
here_data() # current path to data

# Import analysis result objects here
results <- load(here_data("results.Rdata"))

# define complex inline-reporting objects here

Methods

Describe cohort and analytic methods here.

All analyses were conducted using r cite_r(pkgs = c("tidyverse", "gtsummary"), add_citation = TRUE).

Results

Describe analytic results here.

Tables & Figures

References

ddsjoberg/bstfun documentation built on July 4, 2023, 10:59 a.m.