R/covloc.R

covloc <-
function(x){
#
# Return mean and covarinace matrix
#
loc=apply(x,2,mean)
mcov=cov(x)
list(center=loc,cov=mcov)
}
musto101/wilcox_R documentation built on May 23, 2019, 10:52 a.m.