How to get a set of all permutation inn R with given conditions?

Question

I have a set:

lynx <- c(1,1,1,1,1,1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,2,2,3,3,3,3,3,4,4,4,5,5,6,7,8,9)

I want to return a set of all perm