Description Usage Arguments Author(s) References Examples
performs the scatter diagrams of a correspondence analysis.
1 2 3 |
x |
an object of class |
xax |
the column number for the x-axis |
yax |
the column number for the y-axis |
method |
an integer between 1 and 3 |
clab.row |
a character size for the rows |
clab.col |
a character size for the columns |
posieig |
if "top" the eigenvalues bar plot is upside,vif "bottom" it is downside, if "none" no plot |
sub |
a string of characters to be inserted as legend |
csub |
a character size for the legend, used with |
... |
further arguments passed to or from other methods |
Daniel Chessel
Oksanen, J. (1987) Problems of joint display of species and site scores in correspondence analysis. Vegetatio, 72, 51–57.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | data(housetasks)
w <- dudi.coa(housetasks, scan = FALSE)
if(adegraphicsLoaded()) {
g1 <- scatter(w, method = 1, psub.text = "1 / Standard", posieig = "none", plot = F)
g2 <- scatter(w, method = 2, psub.text = "2 / Columns -> averaging -> Rows",
posieig = "none", plot = F)
g3 <- scatter(w, method = 3, psub.text = "3 / Rows -> averaging -> Columns ",
posieig = "none", plot = F)
G <- ADEgS(list(g1, g2, g3), layout = c(2, 2))
} else {
par(mfrow = c(2, 2))
scatter(w, method = 1, sub = "1 / Standard", posieig = "none")
scatter(w, method = 2, sub = "2 / Columns -> averaging -> Rows", posieig = "none")
scatter(w, method = 3, sub = "3 / Rows -> averaging -> Columns ", posieig = "none")
par(mfrow = c(1, 1))
}
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.