是否有一种方法可以在数据中对矩阵的列进行独立排序.表包

Question

我正在阅读这篇文章排序矩阵，我很好奇是否有一些等效的东西，即在数据中独立排序矩阵的列。表包吗?

mat <- matrix(c(45,34,1,3,4325,23,1,2,5,7,3,4,32,734,2),ncol=3)

我想要一些东西:

sort <- matrix(c(1,3,34,45,4325,1,2,5,7,23,2,3,4,32,734),ncol=3)

谢谢!

Answer 1

mat <- matrix(c(45,34,1,3,4325,23,1,2,5,7,3,4,32,734,2),ncol=3)
library(data.table)
DT <- as.data.table(mat)
#     V1 V2  V3
#1:   45 23   3
#2:   34  1   4
#3:    1  2  32
#4:    3  5 734
#5: 4325  7   2
DT[, lapply(.SD, sort, method = "radix")]
#     V1 V2  V3
#1:    1  1   2
#2:    3  2   3
#3:   34  5   4
#4:   45  7  32
#5: 4325 23 734

Answer 2

你可以直接apply，像这样:

apply(mat,2,sort)