作者gsuper (Logit(odds))
看板Statistics
标题[程式] R是否有这种特殊的 rank function?
时间Sun Jun 24 19:07:14 2012
x <- c(4,5,5,5,6)
是否有以下这种 fx <- function
> fx(x)
[1] 1 2 2 2 3
======================================
自己写是这样 , 还满丑的
fx <- function(tmp)
{ RA <- cbind(rank(unique(tmp)),unique(tmp))
DATA <- tmp
for(g in 1:dim(RA)[1]){DATA[tmp==RA[g,2]] <- RA[g,1]}
return(DATA)
}
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.113.239.247
※ 编辑: gsuper 来自: 140.113.239.247 (06/24 19:17)
1F：→ LITTLEN:rank or order? 06/24 19:34
2F：→ gsuper:两个都不行 rank 会产生 1 3 3 3 5 , order 是 1 2 3 4 5 06/24 19:54
3F：推 lin15:可以用as.numeric(factor(rank(x))) 06/24 19:59
4F：→ gsuper:喔喔 谢谢楼上啦~ 06/24 20:52