R/count.diff.direction.error.R

`count.diff.direction.error` <-
function(x,y){
    return(sum((diff(x) / diff(y))<0, na.rm=TRUE))
}

Try the tiger package in your browser

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

tiger documentation built on May 2, 2019, 2:22 a.m.