R/trim.R

In vvconverter: Apply Transformations to Data

#' Trim
#'
#' Trim both leading and trailing whitespaces from string.
#'
#' @param x A text string.
#' @return Cleaned string.
#' @examples
#' trim(" hello ")
#'
#' @export
trim <- function(x) gsub("^\\s+|\\s+$", "", x)

#' LTrim
#'
#' Trim leading whitespace from sting.
#' @param x A text string.
#' @return Cleaned string.
#' @examples
#' trim(" hello")
#' @export
ltrim <- function(x) gsub("^\\s+", "", x)

#' RTrim
#'
#' Trim trailing whitespaces from string.
#' @param x A text string.
#' @return Cleaned string.
#' @examples
#' trim("hello ")
#' @export
rtrim <- function(x) gsub("\\s+$", "", x)