## Example 1. Fit and plot a 3-component mixture of Mallows models with Spearman distance
## to the Antifragility dataset.
r_antifrag <- ranks_antifragility[, 1:7]
set.seed(123)
mms_fit <- fitMSmix(rankings = r_antifrag, n_clust = 3, n_start = 10)
p_mms_fit <- plot(mms_fit)
p_mms_fit$bump_plot()
p_mms_fit$est_clust_prob()
Run the code above in your browser using DataLab