Remove multiple spaces
rm_useless_spaces(t)
t
text
string
## Not run: rm_useless_spaces('hello, Sir!') ## End(Not run)