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

Question

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

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

以及一个特定的顺序，例如

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

。我想根据第二个向量的顺序对第一个向量进行排序，以获得以下向量: c("red","re​​d","white","white","blue","蓝色”、“绿色”)。最好的解决方案是什么？

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"