View source: R/label_meta_clusters.R
label_meta_clusters | R Documentation |
Given a solutions data frame or extended solutions data frame class object and a numeric vector indicating which rows correspond to which meta clusters, assigns meta clustering information to the "meta_clusters" attribute of the data frame.
label_meta_clusters(sol_df, split_vector, order = NULL)
sol_df |
A solutions data frame or extended solutions data frame to assign meta clusters to. |
split_vector |
A numeric vector indicating which rows of sol_df should be the split points for meta cluster labeling. |
order |
An optional numeric vector indicating how the solutions data
frame should be reordered prior to meta cluster labeling. This vector can
be obtained by running |
A solutions data frame with a populated "meta_clusters" attribute.
dl <- data_list(
list(cort_sa, "cortical_surface_area", "neuroimaging", "continuous"),
list(subc_v, "subcortical_volume", "neuroimaging", "continuous"),
list(income, "household_income", "demographics", "continuous"),
list(pubertal, "pubertal_status", "demographics", "continuous"),
uid = "unique_id"
)
set.seed(42)
my_sc <- snf_config(
dl = dl,
n_solutions = 20,
min_k = 20,
max_k = 50
)
sol_df <- batch_snf(dl, my_sc)
sol_df
sol_aris <- calc_aris(sol_df)
meta_cluster_order <- get_matrix_order(sol_aris)
# `split_vec` found by iteratively plotting ari_hm or by ?shiny_annotator()
split_vec <- c(6, 10, 16)
ari_hm <- meta_cluster_heatmap(
sol_aris,
order = meta_cluster_order,
split_vector = split_vec
)
mc_sol_df <- label_meta_clusters(
sol_df,
order = meta_cluster_order,
split_vector = split_vec
)
mc_sol_df
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.