# \donttest{
mb <- system.file("extdata", "microbiome.csv", package = "mbX")
md <- system.file("extdata", "metadata.csv", package = "mbX")
plot_obj <- ezviz(
microbiome_data = mb,
metadata = md,
level = "genus",
selected_metadata = "sample_type",
top_taxa = 20,
flip = FALSE
)
print(plot_obj)
# }
Run the code above in your browser using DataLab