R/p_redaccion_variables.R

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

#' extracción de nombres
#'
#' Función para obtener la redacción de las preguntas en una tabla de política
#'
#' @param tabla dataframe - tabla de la cuál queremos extraer los nombres


#' @return lista con los fraseos de las preguntas

#' 
p_redaccion_variables <- function(tabla){
  resultado <- names(tabla) %>%
    map(.,str_extract," .*") %>%
    map(.,str_trim)
  return(resultado)
}