R/k_hyd.R

Defines functions `k_hyd`

`k_hyd` <-
function(x){
    d<-diff(x)
    res<--c(d,NA)/x
    res[d>=0]<-NA
    res[x==0]<-NA
    return(res)
}

Try the wasim package in your browser

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

wasim documentation built on May 1, 2019, 6:50 p.m.