Punto 4 - Valentina Velez Franco. Trabajo Final

library(faraway)
data(gala)
require(FactoClass)
library(ade4)
library(ggplot2)
attach(gala)
cluster= FactoClass(dfact = gala,metodo = dudi.pca,nf = 7,nfcl = 7,k.clust = 3,scanFC = FALSE)
cluster$cluster
cluster$carac.cont