Commit f80803a2 authored by mahendra-mariadassou's avatar mahendra-mariadassou
Browse files

Fix typo (induced by name changes)

parent fafbc41d
......@@ -96,7 +96,7 @@ app_server <- function(input, output, session) {
},
content = function(con) {
## Update taxonomy of object phyloseq
phyloseq::tax_table(physeq)[rownames(affiliations$cleaned), ] <- affiliations$cleaned
phyloseq::tax_table(physeq)[rownames(data$cleaned), ] <- data$cleaned
## revert short OTU names back to original names
dict <- setNames(object = otu_dictionary$sequence,
nm = otu_dictionary$OTU)
......
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