data(marty)
## Perform a MFA on splitted data
resMFA <- runMFA(Data=list(group1=t(marty[1:100,]),
group2=t(marty[101:200,])), type=c("c", "c"), graph=FALSE)
## Not run:
# ## plot global analysis with partial individuals
# plot(resMFA, choix="ind", partial="all")
#
# ## plot groups link
# plot(resMFA, choix="group")
# ## End(Not run)
Run the code above in your browser using DataLab