R：當列組發生變化時增加排名

Question

新手到R，我試過谷歌搜索，但我找不到解決方案。

這裏是我的數據幀：

Name   Value 
Bob   50 
Mary   55 
John   51 
Todd   50 
Linda   56 
Tom   55 

所以我排序的，但我需要添加一個排名列，所以它看起來是這樣的：

Name   Value Rank 
Bob   50  1 
Todd   50  1 
John   51  2 
Mary   55  3 
Tom   55  3 
Linda   56  4 

所以，我發現了什麼是：

resultset$Rank <- ave(resultset$Name, resultset$Value, FUN = rank) 

但是這給了我：

Name   Value Rank 
Bob   50  1 
Todd   50  2 
John   51  1 
Mary   55  1 
Tom   55  2 
Linda   56  1 

如此接近，但還沒有那麼遠，

Answer 1

這裏的一個基-R溶液：

uv <- unique(df$Value) 
merge(df,data.frame(uv,r=rank(uv)),by.x="Value",by.y="uv") 

其給出

Value Name r 
1 50 Bob 1 
2 50 Todd 1 
3 51 John 2 
4 55 Mary 3 
5 55 Tom 3 
6 56 Linda 4 

這是低效的存儲器，並具有藉助數據的副作用。你可以做交替：

require(data.table) 
DT <- data.table(df) 
DT[order(Value),r:=.GRP,by=Value] 

這給

Name Value r 
1: Bob 50 1 
2: Mary 55 3 
3: John 51 2 
4: Todd 50 1 
5: Linda 56 4 
6: Tom 55 3 

Answer 2

無需排序......可以使用從「dplyr」 dense_rank：

> library(dplyr) 
> mydf %>% mutate(rank = dense_rank(Value)) 
    Name Value rank 
1 Bob 50 1 
2 Mary 55 3 
3 John 51 2 
4 Todd 50 1 
5 Linda 56 4 
6 Tom 55 3 

Answer 3

我猜你的排名變量可以通過以下方式獲得1:length(unique(df$value))。以下是我的試用版。

df <- data.frame(name = c("Bob", "Mary", "John", "Todd", "Linda", "Tom"), 
       value = c(50, 55, 51, 50, 56, 55)) 
# rank by lengths of unique values 
rank <- data.frame(rank = 1:length(unique(df$value)), value = sort(unique(df$value))) 
merge(df, rank, by="value") 
value name rank 
1 50 Bob 1 
2 50 Todd 1 
3 51 John 2 
4 55 Mary 3 
5 55 Tom 3 
6 56 Linda 4