如何在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