r Remova o espaço em branco e a trilha

trimws(x)
marcofaga