# NOT RUN {
x <- " string "
# Remove whitespace at both sides
chr.trim(x)
# Remove whitespace at the left side
chr.trim(x, side = "left")
# Remove whitespace at the right side
chr.trim(x, side = "right")
# }
Run the code above in your browser using DataLab