R/label.R

In psolymos/mefa: Multivariate Data Handling in Ecology and Biogeography

Defines functions label

Documented in label

'label<-' <-
function(x, value)
{
    if (!is.character(value))
        value <- deparse(value)
    attr(x, "label") <- value
    return(x)
}

label <-
function(x)
{
    attr(x, "label")
}