R/bc.R

In Compositional: Compositional Data Analysis

Defines functions bc

Documented in bc

bc <- function(x, lambda) {

  if ( abs(lambda) > 1e-9 ) {
    y <- ( ( x[, -1] / x[, 1] )^lambda - 1 ) / lambda
  } else y <- Log( x[, -1]/x[, 1] )

  y
}

Try the Compositional package in your browser