R/w_transferencia_variable.R

In pelishk/upax_library: Librería de análisis

#' función para transferir de variables
#'
#' Una función para transferir una variable específica entre 2 dataframes
#'
#' @param var character - el nombre de la variable a transferir
#' @param k1 character - la llave del primer data frame
#' @param k2 character - la llave del segundo data frame
#' @param d1 dataframe - el dataframe del que se extrae información
#' @param d2 dataframe - el dataframe al que se envía la información


w_transferencia_variable <- function(var,k1,k2,d1,d2){
  eval(parse(text = paste0(
    'resultado <- d1$',var,'[match(d2$',k2,',d1$',k1,')]'
  )))
  return(resultado)
}