ADEgS: Creation of 'ADEgS' objects

Description Usage Arguments Value Author(s) See Also Examples

View source: R/ADEgS.R

Description

Creates and displays an "ADEgS" object, a set of ADEg, trellis and/or ADEgS objects, managed by superposition, insertion and/or juxtaposition.

Usage

1
ADEgS(adeglist, positions, layout, add = NULL, plot = TRUE)

Arguments

adeglist

a list of several trellis, ADEg and/or ADEgS objects.

positions

a matrix with four columns and as many rows as the number of graphical objects in ADEglist slot. For each simple graphic, i.e. in each row, the coordinates of the top-right and the bottom-left hand corners are in npc unit (normalized parent coordinates).

layout

a layout indication in two possible forms:

  • a listarguments of the layout function

  • a two-length vectorrows' and columns' number of layout

add

a square matrix with as many rows and columns as the number of graphical objects in the ADEglist slot. The value at the i-th row and j-th column is equal to 1 whether the j-th graphical object in ADEglist slot is superpose to i-th graphical one. Otherwise, this value is equal to 0.

plot

a logical. If the graphics should be displayed

Value

an ADEgS object. If plot = TRUE, the created object is displayed.

Author(s)

Alice Julien-Laferriere, Aurelie Siberchicot [email protected] and Stephane Dray

See Also

ADEgS

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
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)

adegraphics documentation built on May 31, 2017, 2:10 a.m.