powered by
perm(x, clu, rev = FALSE)
clu
cph
partial.order
## scan the multiplication table data s <- matrix(data=c(1, 1, 1, 3, 3, 3, 3, 3, 3), nrow=3, ncol=3, byrow=TRUE) ## the permutation as an endomorphism perm(s, clu = c(1,2,3))
Run the code above in your browser using DataLab