trimspaces:

In vlulla/vlutils: Common utilities that I find useful

Usage

trimspaces(x, which = c("both", "left", "right"), whitespace = "[ \t\r\n]")

Arguments

x
which
whitespace

Examples

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (x, which = c("both", "left", "right"), whitespace = "[ \t\r\n]") 
{
    which <- match.arg(which)
    mysub <- function(re, x) sub(re, "", x, perl = TRUE)
    switch(which, left = mysub(paste0("^", whitespace, "+"), 
        x), right = mysub(paste0(whitespace, "+$"), x), both = mysub(paste0(whitespace, 
        "+$"), mysub(paste0("^", whitespace, "+"), x)))
  }

vlulla/vlutils documentation built on May 21, 2019, 12:35 a.m.