library(rbiom)
biom <- hmp50[1:5]
# Original range
range(as.matrix(biom))
# Rescaled to 0-1
biom_01 <- biom_rescale(biom)
range(as.matrix(biom_01))
# Rescaled to 0-100 (Percentages)
biom_100 <- biom_rescale(biom, range = c(0, 100))
range(as.matrix(biom_100))
Run the code above in your browser using DataLab