data(datangkor)
## contingency table
cont <- datangkor$contingency
distance <- CAdist(cont, nPC = "max")
distance
## run without printing the plot
distance <- CAdist(cont, nPC = "max", graph=FALSE)
Run the code above in your browser using DataLab