R/trim.r

In kgwet/pairedCAC: Testing the difference of correlated agreement coefficients for statistical significance

# ==============================================================
# This is an r function for trimming leading and trealing blanks
# ==============================================================
trim <- function( x ) {
  gsub("(^[[:space:]]+|[[:space:]]+$)", "", x) }