Load-Libraries • repfun

Vignette Build Datetime

message(paste0('Datetime: ',Sys.Date(),':',Sys.time()))
#> Datetime: 2026-01-21:2026-01-21 14:55:49.006228

Load Libraries

library(repfun)
library(devtools)

Create a vector of packages to load.

lbs <- c("janitor", "gmodels", "epiR", "DescTools", "coin", "irr", "Exact", "stats")
lbs <- c('stats','devtools')

Unload all packages in the list above.

trashbin <- lapply(lbs, 
                   function(x) if (x %in% .packages()) {detach(paste0('package:',x), character.only=TRUE)})

Reload all packages in the list above.

suppressMessages(repfun::ru_load_library(lbs))

Confirm all packages in the list above are loaded.

loaded <- lapply(lbs,function(x) x %in% loadedNamespaces())
names(loaded) <- lbs
knitr::kable(stack(loaded)[,c(2,1)], caption = "Is Package Loaded (T/F)?")

Is Package Loaded (T/F)?
ind	values
stats	TRUE
devtools	TRUE