R/plot_model_selection.R
plot_model_selection.Rd
Plot model selection to choose number optimal number of clusters
plot_model_selection(fit, k = NULL)
fit | A |
---|---|
k | Number of clusters |
cowplot
object
set.seed(23) df <- generate_data() protein_names <- names(df)[3:12] df <- dplyr::mutate_at(df, protein_names, function(x) asinh(x/5)) mix_fit <- CytoGLMM::cytoflexmix(df, protein_names = protein_names, condition = "condition", group = "donor", ks = 1:2) #> 1 : * * * * * #> 2 : * * * * * plot_model_selection(mix_fit)