# NOT RUN {
## have a look at the defaults
new("flexclustControl")
## corce a list
mycont <- list(iter=500, tol=0.001, class="w")
as(mycont, "flexclustControl")
## some additional slots
as(mycont, "cclustControl")
## default values for ng.rate
new("cclustControl")@ng.rate
# }
Run the code above in your browser using DataLab