Description Usage Format Source Examples
This data set coleo (coleoptera) is a a fuzzy biological traits table.
1 |
coleo
is a list of 5 components.
is a data frame with 110 rows (species) and 32 columns (categories).
is a vector of species names.
is a vector of fuzzy variables names.
is a factor species family.
is a vector containing the number of categories of each trait.
Bournaud, M., Richoux, P. and Usseglio-Polatera, P. (1992) An approach to the synthesis of qualitative ecological information from aquatic coleoptera communities. Regulated rivers: Research and Management, 7, 165–180.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 | data(coleo)
op <- par(no.readonly = TRUE)
coleo.fuzzy <- prep.fuzzy.var(coleo$tab, coleo$col.blocks)
fca1 <- dudi.fca(coleo.fuzzy, sca = FALSE, nf = 3)
indica <- factor(rep(names(coleo$col), coleo$col))
if(adegraphicsLoaded()) {
glist <- list()
for(i in levels(indica)) {
df <- coleo$tab[, which(indica == i)]
names(df) <- coleo$moda.names[which(indica == i)]
glist[i] <- s.distri(fca1$l1, df, psub.text = as.character(i), ellipseSize = 0,
starSize = 0.5, plot = FALSE, storeData = TRUE)
}
G <- ADEgS(glist, layout = c(3, 3))
} else {
par(mfrow = c(3, 3))
for(j in levels(indica))
s.distri(fca1$l1, coleo$tab[, which(indica == j)], clab = 1.5, sub = as.character(j),
cell = 0, csta = 0.5, csub = 3, label = coleo$moda.names[which(indica == j)])
par(op)
par(mfrow = c(1, 1))
}
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.