R/assign.R

In jackwasey/icd: Comorbidity Calculations and Tools for ICD-9 and ICD-10 Codes

#' Assign all the data in the package to the calling environment
#'
#' Used by \pkg{icd} to load all the data into its environment. This should not
#' be needed by users.
#' @examples
#' \dontrun{
#' icd:::assign_icd_data()
#' ls()
#' }
#' @keywords internal
#' @noRd
assign_icd_data <- function(env = parent.frame()) {
  data_names <- .ls_icd_data()
  lapply(
    data_names,
    function(x) {
      assign(x, get(x), envir = env)
    }
  )
}