To get started, run:

library(devtools)
load_all()
test()

Typical workflow. To avoid having to set the test parameter manually you can set it as an environmental variable, in .env.

test <- Sys.getenv("ENV") == "test"
imported.data <- import_data(test = test)
data <- merge_data(imported.data, test = test)
prepared.data <- prepare_data(data)

Compare opportunities for improvement with preventable death included versus not including preventable deaths.

data$ofi.withouth.preventable.death <- create_ofi(data, include.preventable.death = FALSE)
table(data$ofi)
table(data$ofi.withouth.preventable.death)

Generate pdf vignette.

rmarkdown::render("./vignettes/introduction.Rmd", output_format = "pdf_document")
system("mv ./vignettes/introduction.pdf ./doc/introduction.pdf")


martingerdin/rofi documentation built on Dec. 3, 2024, 12:10 a.m.