rperm function

Draw a Random Permutation Vector with Exchangeability Constraints