R/fp.R

Defines functions fp

Documented in fp

fp <- function(x, lambda) {

  if ( abs(lambda) > 1e-9 ) {
    y <- x[, -1]^lambda - x[, 1]^lambda
  } else {
    y <- Rfast::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. 23, 2023, 5:09 p.m.