R/rpn.R

In nbarsch/pineium: pineium custom scrape package

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))))
}