Remova todos os espaços de branco à direita r
x = " string "
trimws(x)
x
# [1] "string"
marcofaga
x = " string "
trimws(x)
x
# [1] "string"