R/Trim.R

In trinker/qdap2: Bridging the gap between qualitative data and quantitative analysis

#' Remove Leading/Trailing White Space
#' 
#' Remove leading/trailing white space.
#' 
#' @param x The text variable.  
#' @return Returns a vector with the leading/trailing white spaces removed.
#' @export
#' @examples
#' (x <- c("  talkstats.com ", "   really? ", " yeah"))
#' Trim(x)
Trim <-
function (x) gsub("^\\s+|\\s+$", "", x)