Creation of ADEgS objects
Creates and displays an "ADEgS"
object, a set of ADEg
, trellis
and/or ADEgS
objects,
managed by superposition, insertion and/or juxtaposition.
ADEgS(adeglist, positions, layout, add = NULL, plot = TRUE)
adeglist |
a list of several |
positions |
a matrix with four columns and as many rows as the number of graphical objects in |
layout |
a layout indication in two possible forms:
|
add |
a square matrix with as many rows and columns as the number of graphical objects in the |
plot |
a logical. If the graphics should be displayed |
an ADEgS
object. If plot = TRUE
, the created object is displayed.
Alice Julien-Laferriere, Aurelie Siberchicot aurelie.siberchicot@univ-lyon1.fr and Stephane Dray
xy <- matrix(rnorm(20), ncol = 2) g1 <- s.label(xy) g2 <- s.class(xy, fac = as.factor(rep(LETTERS[1:2], length.out = 10)), ppoints.cex = 0, col = c("blue", "red")) g3 <- ADEgS(list(g1, g2), rbind(c(0, 0, 0.5, 1), c(0.5, 0, 1, 1))) g4 <- ADEgS(list(g1, g2), layout = c(2, 1)) g5 <- ADEgS(list(g1, g2)) g6 <- ADEgS(list(g1, g2), add = matrix(c(0, 1, 0, 0), byrow = TRUE, ncol = 2)) data(olympic, package = "ade4") dudi1 <- ade4::dudi.pca(olympic$tab, scan = FALSE) g7 <- s.arrow(dudi1$li) g8 <- s.corcircle(dudi1$co, lab = names(olympic$tab)) g9 <- ADEgS(list(g7, g8), rbind(c(0, 0, 0.5, 1), c(0.5, 0, 1, 1))) g9[[1]] g9[1, drop = FALSE] length(g9)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.