data(clust3)
distm <- FindDistm(clust3, normalize = TRUE)
## Not run:
# fd <- FindFD(distm, 2, "mnorm")
# ans <- FindClustersManual(distm, fd$f, fd$delta)
# names(ans)
# ans$centers
# ## End(Not run)
Run the code above in your browser using DataLab