library(rbiom)

knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>",
  R.options = list(
    pillar.print_min = 5,
    pillar.print_max = 5 ))
biom <- rarefy(hmp50)

bdiv_boxplot(
  biom     = biom, 
  x        = "==Sex", 
  bdiv     = c("Bray-Curtis", "Euclidean"), 
  facet.by = list("==Body Site" = c("Buccal mucosa", "Saliva")) )


cmmr/rbiom documentation built on April 28, 2024, 6:38 a.m.