vecscale {candisc} R Documentation

## 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 origin origin of the vectors factor maximum length of the rescaled vectors relative to the maximum possible

### Value

scale factor, the multiplier of the vectors

### Author(s)

Michael Friendly

vectors

### 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)



[Package candisc version 0.9.0 Index]