https://github.com/cran/robCompositions
Tip revision: 2cc9b1ae6488319f4ae1d1655243b80e72fdcbe8 authored by Matthias Templ on 04 May 2011, 00:00:00 UTC
version 1.5.0
version 1.5.0
Tip revision: 2cc9b1a
alr.R
alr <- function (x, ivar=ncol(x)){
if(dim(x)[2] < 2) stop("data must be of dimension greater equal 2")
x.alr <- log(x/x[, ivar])
res <- list(x.alr=x.alr[,-ivar],
varx=x[,ivar], ivar=ivar, cnames=colnames(x))
class(res) <- "alr"
invisible(res)
}