R/rpn.R

In nbarsch/tfwstring:

Defines functions rpn

Documented in rpn

#' rpn()
#'
#' remove punct/number and get only text
#'
#' @export
rpn <- function(string){
  return(trimws(gsub("[[:digit:]]","",gsub("[[:punct:]]","",string))))
}