在R中自定义排序功能

Question

我想对包含评分的向量进行排序，

r<-c("A","AA","AAA","BBB","BB","B","CCC")

但是，通过应用sort

> sort(r)
[1] "A"   "AA"  "AAA" "B"   "BB"  "BBB" "CCC"

有什么方法可以使我得到以下信息

"AAA"   "AA"  "A" "BBB"   "BB"  "B" "CCC"

Answer 1

您需要使用因素并按如下所示创建级别：

    r<-c("A","AA","AAA","BBB","BB","B","CCC")
    r <- factor(r, levels = c("AAA", "AA","A","BBB","BB","B","CCC"))
    sort(r)

Answer 2

r <- c("A","AA","AAA","BBB","BB","B","CCC") 
r <- factor(r, levels = c("AAA","AA","A","BBB", "BB", "B", "CCC"))


sort(r)
# [1] AAA AA  A   BBB BB  B   CCC

Answer 3

ave一种选择

ave(r, substr(r, 1, 1), FUN = function(x) sort(x, decreasing = TRUE))
#[1] "AAA" "AA"  "A"   "BBB" "BB"  "B"   "CCC"