如何根据特定顺序对字符向量进行排序？

Question

我有一个看起来像的字符向量

c("white","white","blue","green","red","blue","red")

和特定的顺序

c("red","white","blue","green")

.我想根据第二个向量的顺序对第一个向量进行排序,以获得以下向量:c("red","red","white","white","blue","blue", "green").什么是最好的解决方案？

Answer 1

x <- c("white","white","blue","green","red","blue","red")
y <- c("red","white","blue","green")
x[order(match(x, y))]
# [1] "red"   "red"   "white" "white" "blue"  "blue"  "green"

Answer 2

使变量成为具有适当顺序的水平的因子，并且sort()：

 x1 <- c("white","white","blue","green","red","blue","red")
 ord <- c("red","white","blue","green")
 f1 <- factor(x1,levels=ord)
 sort(f1)
 ## [1] red   red   white white blue  blue  green
 ## Levels: red white blue green

x2 <- as.character(sort(f1))如果您确实希望将结果用作字符向量，则可以使用...