library(rbiom)
biom <- hmp50[1:5]
# Raw counts sum to different library sizes
sample_sums(biom)
# Relativized counts sum to 1
biom_rel <- biom_relativize(biom)
sample_sums(biom_rel)
Run the code above in your browser using DataLab