Commit 30830cb3 authored by Midoux Cedric's avatar Midoux Cedric

tableGlom

parent 9b4f65e5
......@@ -61,7 +61,7 @@ output$tableGlom <- DT::renderDataTable(server = FALSE, {
taxTableGlom <- Glom %>%
tax_table() %>%
as.data.frame(stringsAsFactors = FALSE) %>%
dplyr::select(input$glomRank:1) %>%
dplyr::select(1:input$glomRank) %>%
tibble::rownames_to_column()
otuTableGlom <- Glom %>%
otu_table() %>%
......
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