r Удалить ведущий и следующий пробел

trimws(x)
marcofaga