# NOT RUN {
# Multiple Correspondence Analysis
# +++++++++++++++++++++++++++++++++
library(FactoMineR)
data(poison)
res.mca <- MCA(poison, quanti.sup = 1:2,
quali.sup = 3:4, graph=FALSE)
fviz_ellipses(res.mca, 1:4, geom = "point",
palette = "jco")
# }
Run the code above in your browser using DataLab