Compute the cost and clusters based on an input dissimilarity matrix and medoids
cost_clusters_from_dissim_medoids(data, medoids)
data
: a dissimilarity matrix, where the main diagonal equals 0.0 and the number of rows equals the number of columnsmedoids
: a vector of output medoids of the 'Cluster_Medoids', 'Clara_Medoids' or any other 'partition around medoids' functiona list object that includes the cost and the clusters
data(dietary_survey_IBS) dat = dietary_survey_IBS[, -ncol(dietary_survey_IBS)] dat = center_scale(dat) cm = Cluster_Medoids(dat, clusters = 3, distance_metric = 'euclidean', swap_phase = TRUE) res = cost_clusters_from_dissim_medoids(data = cm$dissimilarity_matrix, medoids = cm$medoid_indices) # cm$best_dissimilarity == res$cost # table(cm$clusters, res$clusters)
Lampros Mouselimis