inst/shiny/modules/utils.R

In polmineR: Verbs and Nouns for Corpus Analysis

#' Rectify special characters.
#' 
#' @param x character vector to work on
#' @export rectifySpecialChars
rectifySpecialChars <- function(x){
  x <- gsub('\u201E', '"', x)
  x <- gsub('\u201C', '"', x) 
  x
}