R/deploy_dic.R

Defines functions deploy_dic

Documented in deploy_dic

#' Deploy dictionary information
#'
#' @param data A data frame
#' @param dic_list A list created by the backup_dic() function.
#'
#' @return A data frame with added dic information from dic_list
#' @export

deploy_dic <- function(data, dic_list) {
  for(item in names(dic_list)) {
    if(item %in% names(data)) attr(data[[item]], .opt$dic) <- dic_list[[item]]
  }
  data <- dic_haven(data)
  data
}
jazznbass/scaledic documentation built on Sept. 20, 2021, 7:43 p.m.