настроить функцию сортировки в 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

Один вариант с ave

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

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)

Answer 3

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