SndT_Fra <- read.table(system.file("extdata", "SndT_Fra.txt", package = "svs"),
header = TRUE, sep = "\t", quote = "\"", encoding = "UTF-8")
mca.SndT_Fra <- fast_mca(SndT_Fra)
mca.SndT_Fra
}
references{
Greenacre, M. (2007) emph{Correspondence analysis in practice, Second edition}. Boca Raton: Chapman and Hall/CRC.
}Run the code above in your browser using DataLab