Skip to contents

Draw a heatmap of top microbe-metabolite correlations.

Usage

plot_correlation_heatmap(
  object,
  top_n_taxa = 20,
  top_n_metabolites = 20,
  value = c("estimate", "q_value")
)

Arguments

object

A microbe_metabolite_association object.

top_n_taxa

Number of taxa retained.

top_n_metabolites

Number of metabolites retained.

value

Column mapped to fill.

Value

A ggplot object.

Examples

data("demo_crossomics", package = "microbiomedataset")

correlation <- calculate_correlation(
  microbiome_data = demo_crossomics$microbiome_data,
  metabolome_data = demo_crossomics$metabolome_data,
  sample_link = demo_crossomics$sample_link,
  microbiome_rank = "Genus",
  metabolome_transform = "none"
)
plot_correlation_heatmap(correlation, top_n_taxa = 8, top_n_metabolites = 8)