plot.cma {analogue}R Documentation

Draws stripcharts of close modern analogue results

Description

Draws stripcharts of close modern analogue results. stripchart produces one dimensional scatter plots (or dot plots) of the given data. These plots are a good alternative to boxplot's when sample sizes are small.

Usage

## S3 method for class 'cma':
plot(x, method = c("overplot", "jitter", "stack"),
   jitter = 0.1, vertical = FALSE,
   draw.quant = TRUE, xlab = NULL, ylab = "",
   main = "", cex.axis = NULL, ...,
   col.quant = "red", lty.quant= "dashed")

Arguments

x an object of class "cma".
method the method to be used to separate coincident points. The default method
"overplot" causes such points to be overplotted, but it is also possible to specify "jitter" to jitter the points, or "stack" have coincident points stacked. The last method only makes sense for very granular data.
jitter when method="jitter" is used, jitter gives the amount of jittering applied.
vertical when vertical is TRUE the plots are drawn vertically rather than the default horizontal.
draw.quant logical; should the quantiles be drawn on the stripchart?
xlab,ylab,main Graphical parameters
cex.axis The magnification to be used for axis annotation relative to the current setting of cex. See par.
... additional arguments passed to stripchart
col.quant,lty.quant colour and line type in which to drawn the quantile lines.

Details

Simple wrapper to stripchart.

Value

A plot is produced on the currently active device. Also invisibly returns a list with the following components:

distances a vector of stacked distances extracted from object.
groups a factor listing the fossil sample for which the distances are the distances to the close modern analogues for the training set.

Author(s)

Gavin L. Simpson

See Also

stripchart, or boxplot for an alternative representation.

Examples

## continue the RLGH and SWAP example from ?join
example(join)

## analog matching between SWAP and RLGH core
swap.analog <- analog(swapdiat, rlgh, method = "chord")
swap.analog
summary(swap.analog)

## close modern analogues
swap.cma <- cma(swap.analog)

## plot the results
## many samples so reduce the label and point size
plot(swap.cma, cex.axis = 0.6, cex = 0.6)

[Package analogue version 0.3-3 Index]