R/remove_multiple_spaces.R

#' Remove mutiple spaces from a string
#'
#' @param str  A string. The string to be cleaned
#'
#'
#' @return str  The cleaned string
#' 
#' @import stringr
#'
#' @export
#'
#' @examples
#' # library(rgmrfilm)
#' #

remove_multiple_spaces <- function(str){
    library(stringr)
    str <- gsub("\\s+", " ", str_trim(string))
    return(str)
}
jrminter/rgmrfilm documentation built on May 18, 2019, 2:38 a.m.