R/app_config.R

In regressoR: Regression Data Analysis System

#' Access files in the current app
#' 
#' @param ... Character vector specifying directory and or file to
#'     point to inside the current package.
#' 
#' @noRd
app_sys <- function(...){
  system.file(..., package = "regressoR")
}


#' 
#' #' Read App Config
#' #' 
#' #' @param value Value to retrieve from the config file. 
#' #' @param config R_CONFIG_ACTIVE value. 
#' #' @param use_parent Logical, scan the parent directory for config file.
#' #'     
#' #' @importFrom config get
#' #' 
#' #' @noRd
#' get_golem_config <- function(
#'   value, 
#'   config = Sys.getenv("R_CONFIG_ACTIVE", "default"), 
#'   use_parent = TRUE
#' ){
#'   config::get(
#'     value = value, 
#'     config = config, 
#'     # Modify this if your config file is somewhere else:
#'     file = app_sys("golem-config.yml"), 
#'     use_parent = use_parent
#'   )
#' }