mantel.test(mtcars$gear,mtcars$cyl)
mantel.test(table(mtcars$gear,mtcars$cyl))
mantel.test(table(mtcars$gear,mtcars$cyl), row.scores="midrank")
mantel.test(table(mtcars$gear,mtcars$cyl), col.scores="midrank")Run the code above in your browser using DataLab