covMcd(x, cor=FALSE, alpha=1/2, nsamp=500, seed=0, print.it=FALSE, control)cor = FALSEalpha*n
    observations are used for computing the determinant.  Allowed values
    are between 0.5 and 1 and the default is 0.5.nsamp = 500seed = 0print.it = FALSE"mcd" which is basically a list with
  componentscor = TRUE).best is equal to quan.quan equals n.obs, the MCD is the classical covariance
    matrix.match.call).covMcd() is similar to the existing Rfunction
  cov.mcd() in P. J. Rousseeuw and K. van Driessen (1999) A fast algorithm for the minimum covariance determinant estimator. Technometrics 41, 212--223.
Pison, G., Van Aelst, S., and Willems, G. (2002), Small Sample Corrections for LTS and MCD, Metrika, 55, 111-123.
cov.mcd from package covOGK as cheaper alternative for larger dimensions.data(hbk)
hbk.x <- data.matrix(hbk[, 1:3])
covMcd(hbk.x)
## the following three statements are equivalent
c1 <- covMcd(hbk.x, alpha = 0.75)
c2 <- covMcd(hbk.x, control = rrcov.control(alpha = 0.75))
## direct specification overrides control one:
c3 <- covMcd(hbk.x, alpha = 0.75,
             control = rrcov.control(alpha=0.95))
c1Run the code above in your browser using DataLab