R/Scov.R

Scov <-
function(m){
#
# Compute Davies' covariance S-estimator
#
library("rrcov")
res=CovSest(m)
center=res@center
z=res@cov
list(center=center,cov=z)
}
musto101/wilcox_R documentation built on May 23, 2019, 10:52 a.m.