R - 当Col2> Col3时,数据表的Col1中的数字唯一Vals

Question

SampleTable:

ID      Score1      Score2
1       100         88
1       96          94
1       94          95
2       100         100
2       98          94
3       77          88

所以我希望返回值为2,因为有2个唯一的人有一个Score1> Score2的实例.

为了再现性:

df = data.frame( ID=c(1,1,1,2,2,3), Score1=c(100,96,94,100,98,77), Score2=c(88,94,95,100,94,88) )
ID Score1 S

我刚在想

length( unique( which( df$Score1 > df$Score2 ) ) )

然而,返回3,显然是因为它没有考虑寻找df$ID唯一的,只是唯一出现的数量.我如何解释想要独特的唯一数量df$ID？

Answer 1

我想你在baseR中寻找这个:

length(unique(df$ID[df$Score1 > df$Score2]))
[1] 2

或使用data.table:

library(data.table)
setDT(df)[Score1 > Score2, uniqueN(ID)]

或者dplyr:

library(dplyr)
df %>% filter(Score1 > Score2) %>% { n_distinct(.$ID) }