Commit 3fb77eb3 authored by Sebastien Theil's avatar Sebastien Theil
Browse files

add as.matrix to tax_table.

parent 270b1807
......@@ -56,7 +56,7 @@ generate_phyloseq_fun <- function(dada_res = dada_res, tax.table = tax.table, tr
data <- phyloseq(dada_res$otu.table, tax_table(as.matrix(tax.table)), sample.metadata, DNAStringSet(sequences))
} else{
flog.info('Building phyloseq object with tree...')
data <- phyloseq(dada_res$otu.table, tax.table, sample.metadata, phy_tree(tree), DNAStringSet(sequences))
data <- phyloseq(dada_res$otu.table, tax_table(as.matrix(tax.table)), sample.metadata, phy_tree(tree), DNAStringSet(sequences))
}
flog.info('Done.')
data_rel <- transform_sample_counts(data, function(x) x / sum(x) )
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment