diff --git a/server.R b/server.R
index 16f183b1e18355a7cca0b491c110a67df5cd93cf..772c78b83644c0c0146279bbd59bdd94c85d1abc 100644
--- a/server.R
+++ b/server.R
@@ -220,7 +220,7 @@ shinyServer
   })
   
   output$tableGlom <- DT::renderDataTable(server = FALSE, {
-    Glom <- tax_glom(data16S(), input$glomRank)
+    Glom <- tax_glom(data16S(), input$glomRank, NArm=FALSE)
     taxTableGlom <- Glom %>%
       tax_table() %>%
       as.data.frame(stringsAsFactors = FALSE) %>%