R/bc.R

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

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

Compositional documentation built on Oct. 9, 2024, 5:10 p.m.