vecscale: Scale vectors to fill the current plot

In candisc: Visualizing Generalized Canonical Discriminant and Canonical Correlation Analysis

Scale vectors to fill the current plot

Description

Calculates a scale factor so that a collection of vectors nearly fills the current plot, that is, the longest vector does not extend beyond the plot region.

Usage

vecscale(
  vectors,
  bbox = matrix(par("usr"), 2, 2),
  origin = c(0, 0),
  factor = 0.95
)

Arguments

vectors	a two-column matrix giving the end points of a collection of vectors
bbox	the bounding box of the containing plot region within which the vectors are to be plotted. The default is the bounding box of the current plot window, obtained from par("usr").
origin	origin of the vectors. Defaults to (0, 0).
factor	maximum length of the rescaled vectors relative to the maximum possible

Details

This function is used in, e.g., vectors() to draw labeled vectors in a dimension-reduction plot. The scaling calculated here doesn't directly calculate space for the labels to fit within the plot regions. The factor argument can provide for that, shrinking the vectors by that factor.

Value

scale factor, the numeric multiplier of the vectors

Author(s)

Michael Friendly

See Also

vectors(), plot.candisc(), heplot.candisc()

Examples

bbox <- matrix(c(-3, 3, -2, 2), 2, 2)
colnames(bbox) <- c("x","y")
rownames(bbox) <- c("min", "max")
bbox

vecs <- matrix( runif(10, -1, 1), 5, 2)

plot(bbox)
arrows(0, 0, vecs[,1], vecs[,2], angle=10, col="red")
(s <- vecscale(vecs))
arrows(0, 0, s*vecs[,1], s*vecs[,2], angle=10)

candisc documentation built on Nov. 5, 2025, 7:08 p.m.