延伸排名（）「奧運風格」

在奧運會上，如果兩個人綁在一起銀子 - 他們不會頒發銅牌。延伸排名（）「奧運風格」

這裏的數據種類的樣品我的工作：

x <- c(0.64, 0.64, 0.63, 0.62, 0.62, 0.62, 0.61, 0.6, 0.6, 0.58)

我想創建一個排名函數輸出像這樣：

rank.fun(x) 
1 1 3 4 4 4 7 8 8 10

我試着與findInterval,rank,floor,ceiling混亂，但他們都沒有提供我正在尋找的結果。

如何： rank(-x, ties.method="min")

2012-01-30 21:47:07

看起來你可以做到這一點與rank：

> rank(-x, ties="min") 
[1] 1 1 3 4 4 4 7 8 8 10

2012-01-30 21:46:59

答案就是這麼簡單。嘆。 – 2012-01-30 21:56:01

也許，但是當它不立即出現時，通常很難看到簡單的解決方案。 – 2012-01-30 21:57:43

回答