powered by
InvertPermutation(p)
p <- rank(rnorm(10)) pInv <- InvertPermutation(p)
Run the code above in your browser using DataLab