Commit 05731a0c authored by Midoux Cedric's avatar Midoux Cedric

NArm=FALSE dans tableGlom

parent d16b8192
...@@ -220,7 +220,7 @@ shinyServer ...@@ -220,7 +220,7 @@ shinyServer
}) })
output$tableGlom <- DT::renderDataTable(server = FALSE, { output$tableGlom <- DT::renderDataTable(server = FALSE, {
Glom <- tax_glom(data16S(), input$glomRank) Glom <- tax_glom(data16S(), input$glomRank, NArm=FALSE)
taxTableGlom <- Glom %>% taxTableGlom <- Glom %>%
tax_table() %>% tax_table() %>%
as.data.frame(stringsAsFactors = FALSE) %>% as.data.frame(stringsAsFactors = FALSE) %>%
......
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