data(farms, package = "MASS")
## Compute multiple correspondence analysis
X <- mca(farms)
## Symetric MCA biplot
biplot(X, type = "symetric", labels = "columns")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.