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 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73
|
\name{s.value}
\alias{s.value}
\title{Representation of a value in a graph}
\description{
performs the scatter diagram with the representation of a value for a variable
}
\usage{
s.value(dfxy, z, xax = 1, yax = 2, method = c("squaresize", "greylevel"),
zmax=NULL, csize = 1, cpoint = 0, pch = 20, clegend = 0.75, neig = NULL,
cneig = 1, xlim = NULL, ylim = NULL, grid = TRUE, addaxes = TRUE,
cgrid = 0.75, include.origin = TRUE, origin = c(0,0), sub = "",
csub = 1, possub = "topleft", pixmap = NULL, contour = NULL,
area = NULL, add.plot = FALSE)
}
\arguments{
\item{dfxy}{a data frame with two coordinates}
\item{z}{a vector of the values corresponding to the rows of \code{dfxy}}
\item{xax}{column for the x axis}
\item{yax}{column for the y axis}
\item{method}{a string of characters \cr
"squaresize" gives black squares for positive values and white for negative values with a proportional area equal to the absolute value. \cr
"greylevel" gives squares of equal size with a grey level proportional to the value. By default the first choice}
\item{zmax}{a numeric value, equal by default to max(abs(z)), can be used to impose a common scale of the size of the squares to several drawings in the same device}
\item{csize}{a size coefficient for symbols}
\item{cpoint}{a character size for plotting the points, used with \code{par("cex")*cpoint}. If zero, no points are drawn}
\item{pch}{if \code{cpoint} > 0, an integer specifying the symbol or the single character to be used in plotting points}
\item{clegend}{a character size for the legend used by \code{par("cex")*clegend}}
\item{neig}{a neighbouring graph}
\item{cneig}{a size for the neighbouring graph lines used with \code{par("lwd")*cneig}}
\item{xlim}{the ranges to be encompassed by the x, if NULL they are computed}
\item{ylim}{the ranges to be encompassed by the y, if NULL they are computed}
\item{grid}{a logical value indicating whether a grid in the background of the plot should be drawn}
\item{addaxes}{a logical value indicating whether the axes should be plotted}
\item{cgrid}{a character size, parameter used with \code{par("cex")*cgrid} to indicate the mesh of the grid}
\item{include.origin}{a logical value indicating whether the point "origin" should be belonged to the graph space}
\item{origin}{the fixed point in the graph space, for example c(0,0) the origin axes}
\item{sub}{a string of characters to be inserted as legend}
\item{csub}{a character size for the legend, used with \code{par("cex")*csub}}
\item{possub}{a string of characters indicating the sub-title position ("topleft", "topright", "bottomleft", "bottomright")}
\item{pixmap}{an object 'pixmap' displayed in the map background}
\item{contour}{a data frame with 4 columns to plot the contour of the map : each row gives a segment (x1,y1,x2,y2)}
\item{area}{a data frame of class 'area' to plot a set of surface units in contour}
\item{add.plot}{if TRUE uses the current graphics window}
}
\value{
The matched call.
}
\author{Daniel Chessel}
\examples{
if(!adegraphicsLoaded()) {
xy <- cbind.data.frame(x = runif(500), y = runif(500))
z <- rnorm(500)
s.value(xy, z)
s.value(xy, z, method = "greylevel")
data(rpjdl)
fau.coa <- dudi.coa(rpjdl$fau, scan = FALSE, nf = 3)
s.value(fau.coa$li, fau.coa$li[,3], csi = 0.75, cleg = 0.75)
data(irishdata)
par(mfrow = c(3, 4))
irq0 <- data.frame(scale(irishdata$tab, scale = TRUE))
for (i in 1:12) {
z <- irq0[, i]
nam <- names(irq0)[i]
s.value(irishdata$xy, z, area = irishdata$area, csi = 3,
csub = 2, sub = nam, cleg = 1.5, cgrid = 0, inc = FALSE,
xlim = c(16, 205), ylim = c(-50, 268), adda = FALSE, grid = FALSE)
}
}}
\keyword{multivariate}
\keyword{hplot}
|