Return the node and edge tables from a microbe_metabolite_network object.
Usage
extract_network_result(object, what = c("both", "nodes", "edges"))Examples
data("demo_crossomics", package = "microbiomedataset")
x <- calculate_correlation(
microbiome_data = demo_crossomics$microbiome_data,
metabolome_data = demo_crossomics$metabolome_data,
sample_link = demo_crossomics$sample_link,
metabolome_transform = "none"
)
x <- build_correlation_network(x, min_abs_correlation = 0.2, max_q_value = 1)
names(extract_network_result(x, what = "both"))
#> [1] "nodes" "edges"
