R - 按等级提取值

Question

假设我有一个我根据Value列订购的数据框，现在看起来像这样：

Name  Value
A       2
B       2
C       5
D       5
E      10
F      12

我正在编写一个函数，其中一个参数是一个等级（例如rank = 2），我希望输出是相应的名称（例如C＆amp; D）。任何关系都应该平等排列。

我非常感谢任何指导，因为我已经尝试了多种方法来完成这项工作并且不断出现某种错误。

Answer 1

我们可以将Value转换为factor，然后将其转换为numeric以获得相同数字的相同排名

getRank <- function(rank) {
  df$Name[as.numeric(factor(df$Value)) == rank]
}

getRank(1)
#[1] A B
#Levels: A B C D E F
getRank(2)
#[1] C D
#Levels: A B C D E F
getRank(3)
#[1] E
#Levels: A B C D E F

如果我们需要输出character，我们可以将其包装在as.character

中

getRank <- function(rank) {
  as.character(df$Name[as.numeric(factor(df$Value)) == rank])
}

Answer 2

您可以使用match对唯一值集进行索引：

get_rank <- function(r) df$Name[match(df$Value, unique(df$Value)) == r]

get_rank(2)
## [1] C D
## Levels: A B C D E F