R/f.log.R

f.log <- function(x){
    i <- (x > 0)
    aus <- x[i]
    const <- median(aus) / ( (median(aus) / quantile(aus,
              probs = 0.25)) ^ 2.9)
    log10(x+const)
    }

Try the cwhmisc package in your browser

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

cwhmisc documentation built on May 1, 2019, 7:55 p.m.