Depois de transformar a variável para numérica eu ordenei, sem NA, deu certo.

Tsfa$x = as.numeric(Tsfa$x)
Tsfa$x <- sort(Tsfa$x[!is.na(Tsfa$x)])

Boa sorte.

Helena