polarolouis/human-microbiome-compendium
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Begin adding matching graph in multipartite

Browse source
This commit is contained in:
Louis 2026-02-24 14:51:37 +01:00
parent de4984c2c0
commit 9995e60b20
1 changed files with 8 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
multipartite_taxtable.R
View file

@ -40,3 +40,11 @@ multipartite_fit <- estimateMultipartiteSBM(listSBM = lbm_list, estimOptions = l
multipartite_covariates_fit <- estimateMultipartiteSBM(listSBM = lbm_list_covariates, estimOptions = list(initBM = FALSE))
plot(multipartite_covariates_fit)
lbm_list <- lapply(seq_along(per_taxa_networks), function(idx) {
defineSBM(per_taxa_networks[[idx]], model = "poisson", dimLabels = c(row = paste0("Rank", idx + 1), col = "Sample"))
})
multipartite_fit <- estimateMultipartiteSBM(listSBM = lbm_list, estimOptions = list(initBM = FALSE))