Natural ordering in R