r - 将观察数据框转化为等级

Question

我有这样一个数据集:

df <- data.frame(situation1=rnorm(30),
             situation2=rnorm(30),
             situation3=rnorm(30),
             models=c(rep("A",10), rep("B",10), rep("C", 10)))

我在三种情况下比较三种模型(A、B、C)。我对每个模型进行了 10 次测量。

我现在想将其总结为排名，即每个模型在每种情况下获胜的频率。获胜由最高值定义。

最终输出可能是这样的:

model situation1 situtation2 situtation3
A          4          3            3
B          7          1            2
C          1          4            5

Answer 1

在 base R 中:

table(df$models,colnames(df[-4])[max.col(df[-4])])
#    situation1 situation2 situation3
#  A          2          4          4
#  B          4          5          1
#  C          2          4          4

结果可能与您的 OP 不同，因为您没有设置 seed。