powered by
data(chazeb)
data(chazeb) plot(discrimin(dudi.pca(chazeb$tab, scan = FALSE), chazeb$cla, scan = FALSE))
Run the code above in your browser using DataLab