R/locCV.R

locCV <-
function(y,varfun=pbvar,locfun=median,...){
vals=NA
n=length(y)
est=locfun(y)
for(i in 1:n)vals[i]=y[i]-locfun(y[-i],...)
res=varfun(vals)
res
}
musto101/wilcox_R documentation built on May 23, 2019, 10:52 a.m.