a <- c(5,4,3,2,1) b <- c(1,2,3,4,5) c <- cbind(a,b) c[order(c[,1]),] #按第一列递增排序 转载https://blog.csdn.net/illfm/article/details/15218349