R/w_limpieza_caracteres.R

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

#' función para limpiar los caracteres raros de un dataframe
#'
#' Limpia los espacios raros, y la puntuación en un dataframe
#'
#' @param tabla dataframe que se desea limpiar
#'
#' @return dataframe limpio



# función para transformar matriz de marcas a matriz de menciones y su inversa
w_limpieza_caracteres <- function(tabla){
  tabla_limpia <- as.data.frame(gsub("[[:punct:]]", "", as.matrix(tabla)))
  tabla_limpia <- as.data.frame(gsub('[\r\n\t]', "", as.matrix(tabla_limpia)))
  return(tabla_limpia)
}