如何对 data.table 中的每一行进行排序？ [复制]

Question

data.table 对每行中的值进行排序的方式是什么？我可以很容易地编写一个循环来逐行进行排序，但我认为这不是一种非常聪明的做事方式。

例子：

让我们有一个data.table 喜欢：

df = data.table(ID = c('a', 'b', 'c', 'd', 'e', 'f'),
                v1 = c(1,2,1,3,4,5),
                v2 = c(2,3,6,1,0,2),
                v3 = c(0,0,1,2,3,5))

我可以像这样使用for loop 对其进行排序：

for (i in 1:nrow(df))
{
  df[i, 2:4] = sort(df[i, 2:4], decreasing = T)
}

它给出了预期的结果：

   ID v1 v2 v3
1:  a  2  1  0
2:  b  3  2  0
3:  c  6  1  1
4:  d  3  2  1
5:  e  4  3  0
6:  f  5  5  2

但这似乎是一种很慢的做事方式。

Answer 1

你必须使用data.table吗？带有MARGIN = 1 方法的基本R apply 怎么样？

df <- as.data.frame(df)
df[-1] <- t(apply(df[-1], 1, function(x) sort(x, decreasing = T)))
df
#  ID v1 v2 v3
#1  a  2  1  0
#2  b  3  2  0
#3  c  6  1  1
#4  d  3  2  1
#5  e  4  3  0
#6  f  5  5  2