R/ogk_1.R

OGK <-
function(x,niter=2,beta=.9,control){
#
#  OGK estimator via the R package rrcov
#
library(rrcov)
v=CovOgk(x,niter=niter,beta=beta,control)
list(center=v@center,cov=v@cov)
}
musto101/wilcox_R documentation built on May 23, 2019, 10:52 a.m.