R/scores.ordihull.R

Defines functions `scores.ordihull`

## Extract the points in the hull as a one matrix
`scores.ordihull` <-
    function(x, ...)
{
    out <- NULL
    for(i in seq_along(x))
        out <- rbind(out, x[[i]])
    hulls <- rep(names(x), sapply(x, function(z) NROW(z)))
    attr(out, "hulls") <- hulls
    out
}

Try the vegan package in your browser

Any scripts or data that you put into this service are public.

vegan documentation built on Sept. 11, 2024, 7:57 p.m.