sort(,decreasing=T) replace rev()