r - 对表格进行排序/排序/排名

Question

我有一张这样的 table

表(mtcars$gear，mtcars$cyl)

我想按第 4 个圆柱体中具有更多观察值的行对行进行排名。例如。

     4  6  8
  4  8  4  0
  5  2  1  2
  3  1  2 12

我一直在玩顺序/排序/排名，但没有取得太大成功。我如何订购表格输出？

Answer 1

我们可以将table转换为data.frame，然后按列order。

sort_col <- "4"
tab <- as.data.frame.matrix(table(mtcars$gear, mtcars$cyl))
tab[order(-tab[sort_col]), ]
# OR tab[order(tab[sort_col], decreasing = TRUE), ]

#  4 6  8
#4 8 4  0
#5 2 1  2
#3 1 2 12

---

如果我们不想将它转换成数据框，并且想维护我们可以做的table结构

tab <- table(mtcars$gear, mtcars$cyl)
tab[order(-tab[,dimnames(tab)[[2]] == sort_col]),]

#     4  6  8
#  4  8  4  0
#  5  2  1  2
#  3  1  2 12