R/clean_text.R

In cookm346/textfeats: Computes features for text

Defines functions clean_text

Documented in clean_text

#' Clean Text
#'
#' Clean Text
#' @param x a string
#' @return a vector of strings
#' @export

clean_text <- function(x){
    return(tolower(unlist(strsplit(gsub("[^[:alnum:] ]", "", x), " +"))))
}