Upsample a counts table to a higher taxon level

upsample_counts(counts_table, tax_table, higher_level)

Arguments

counts_table

A organism x sample data frame of counts

tax_table

A organism x taxlev data frame of labels

higher_level

Higher taxon level to upsample to

Value

A organism x sample data frame of counts

Examples

toy_data <- readRDS(system.file("extdata/toy_data.rds", 
package = "animalcules"))
tax_table <- toy_data$tax_table
sam_table <- toy_data$sam_table
counts_table <- toy_data$counts_table
counts_table <- upsample_counts(counts_table, tax_table, "phylum")