s <- " padded " # trimws removes leading and trailing whitespace print(trimws(s))
strip surrounding whitespace