s.class: Plot of factorial maps with representation of point classes In ade4: Analysis of Ecological Data : Exploratory and Euclidean Methods in Environmental Sciences

Description

performs the scatter diagrams with representation of point classes.

Usage

 ```1 2 3 4 5 6 7``` ```s.class(dfxy, fac, wt = rep(1, length(fac)), xax = 1, yax = 2, cstar = 1, cellipse = 1.5, axesell = TRUE, label = levels(fac), clabel = 1, cpoint = 1, pch = 20, col = rep(1, length(levels(fac))), xlim = NULL, ylim = NULL, grid = TRUE, addaxes = TRUE, origin = c(0,0), include.origin = TRUE, sub = "", csub = 1, possub = "bottomleft", cgrid = 1, pixmap = NULL, contour = NULL, area = NULL, add.plot = FALSE) ```

Arguments

 `dfxy` a data frame containing the two columns for the axes `fac` a factor partitioning the rows of the data frame in classes `wt` a vector of the point weightings of the data frame used for computing the means (star centers) and the ellipses of dispersion `xax` the column number of x in `dfxy` `yax` the column number of y in `dfxy` `cstar` a number between 0 and 1 which defines the length of the star size `cellipse` a positive coefficient for the inertia ellipse size `axesell` a logical value indicating whether the ellipse axes should be drawn `label` a vector of strings of characters for the point labels `clabel` if not NULL, a character size for the labels, used with `par("cex")*clabel` `cpoint` a character size for plotting the points, used with `par("cex")*cpoint`. If zero, no points are drawn `pch` if `cpoint` > 0, an integer specifying the symbol or the single character to be used in plotting points `col` a vector of colors used to draw each class in a different color `xlim` the ranges to be encompassed by the x, if NULL they are computed `ylim` the ranges to be encompassed by the y, if NULL they are computed `grid` a logical value indicating whether a grid in the background of the plot should be drawn `addaxes` a logical value indicating whether the axes should be plotted `origin` the fixed point in the graph space, for example c(0,0) the origin axes `include.origin` a logical value indicating whether the point "origin" should be belonged to the graph space `sub` a string of characters to be inserted as legend `csub` a character size for the legend, used with `par("cex")*csub` `possub` a string of characters indicating the sub-title position ("topleft", "topright", "bottomleft", "bottomright") `cgrid` a character size, parameter used with par("cex")* `cgrid` to indicate the mesh of the grid `pixmap` an object 'pixmap' displayed in the map background `contour` a data frame with 4 columns to plot the contour of the map : each row gives a segment (x1,y1,x2,y2) `area` a data frame of class 'area' to plot a set of surface units in contour `add.plot` if TRUE uses the current graphics window

Value

The matched call.

Daniel Chessel

Examples

 ``` 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35``` ```if(!adegraphicsLoaded()) { xy <- cbind.data.frame(x = runif(200, -1, 1), y = runif(200, -1, 1)) posi <- factor(xy\$x > 0) : factor(xy\$y > 0) coul <- c("black", "red", "green", "blue") par(mfrow = c(2, 2)) s.class(xy, posi, cpoi = 2) s.class(xy, posi, cell = 0, cstar = 0.5) s.class(xy, posi, cell = 2, axesell = FALSE, csta = 0, col = coul) s.chull(xy, posi, cpoi = 1) par(mfrow = c(1, 1)) ## Not run: data(banque) dudi1 <- dudi.acm(banque, scannf = FALSE) coul = rainbow(length(levels(banque[, 20]))) par(mfrow = c(2, 2)) s.label(dudi1\$li, sub = "Factorial map from ACM", csub = 1.5, possub = "topleft") s.class(dudi1\$li, banque[, 20], sub = names(banque)[20], possub = "bottomright", cell = 0, cstar = 0.5, cgrid = 0, csub = 1.5) s.class(dudi1\$li, banque[, 20], csta = 0, cell = 2, cgrid = 0, clab = 1.5) s.class(dudi1\$li, banque[, 20], sub = names(banque)[20], possub = "topright", cgrid = 0, col = coul) par(mfrow = c(1, 1)) par(mfrow = n2mfrow(ncol(banque))) for(i in 1:(ncol(banque))) s.class(dudi1\$li, banque[, i], clab = 1.5, sub = names(banque)[i], csub = 2, possub = "topleft", cgrid = 0, csta = 0, cpoi = 0) s.label(dudi1\$li, clab = 0, sub = "Common background") par(mfrow = c(1, 1)) ## End(Not run) } ```

ade4 documentation built on May 31, 2017, 4:06 a.m.