Test the proper clusters k for c_means
C-means cluster
cm_test_k(otu_group, filter_var, fast = TRUE)
c_means(otu_group, k_num, filter_var)
ggplot
ggplot
Other C_means:
RSA_by_cm()
# \donttest{
if (requireNamespace("e1071") && requireNamespace("factoextra")) {
data(otutab, package = "pcutils")
pcutils::hebing(otutab, metadata$Group) -> otu_group
cm_test_k(otu_group, filter_var = 0.7)
cm_res <- c_means(otu_group, k_num = 3, filter_var = 0.7)
plot(cm_res, 0.8)
}
#> Loading required namespace: e1071
# }