如何在R中找到逆序矢量？

Question

说我有我的数据x和随机顺序向量：

rand_order <- sample(length(x)) 

现在我可以用这种随机的顺序重新洗牌我的数据，并做一些与他们：

y <- x[rand_order] 

现在

，我怎么能逆 - 重新编号y？即我如何才能找到inverse_rand_order以便y[inverse_rand_order] == x？

Answer 1

存储您的订购指数，然后用它order：

x <- 1:10 
z <- sample(length(x)) 
y <- x[z] 
# [1] 4 1 10 6 9 5 2 8 3 7 

y[order(z)] 
# [1] 1 2 3 4 5 6 7 8 9 10