# NOT RUN {
library(FactoMineR)
data(poison)
res.mca <- MCA(poison, quanti.sup = 1:2, quali.sup = c(3,4),
graph = FALSE)
fviz_mca_biplot(res.mca, repel = TRUE)+
theme_minimal()
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab