# NOT RUN {
## the following two statements are equivalent
ctrl1 <- new("CovControlMMest", bdp=0.25)
ctrl2 <- CovControlMMest(bdp=0.25)
data(hbk)
CovMMest(hbk, control=ctrl1)
# }
Run the code above in your browser using DataLab