Analysis"

knitr::opts_chunk$set(echo = TRUE)

set.seed({{format(Sys.Date(), format = "%Y%m%d")}})

Analytic Data Import

library(gtsummary); library(tidyverse)

# setting and gtsummary theme
theme_gtsummary_compact()

# importing master analytic data set
df_main <- readRDS(file = here::here("secure_data", "df_main.Rds"))

Analysis


Save Results

# list result objects here. save only those needed for the final report
save(
  df_results, gts_table1,
  file = here::here("secure_data", "results.Rdata")
)


Try the starter package in your browser

Any scripts or data that you put into this service are public.

starter documentation built on June 7, 2023, 6:33 p.m.