Retirez tous les Whitspaces traînants R

x = "   string   "
trimws(x)
x
# [1] "string"
marcofaga