diff --git a/R/collocationAnalysis.R b/R/collocationAnalysis.R
index d8df60b..36c7460 100644
--- a/R/collocationAnalysis.R
+++ b/R/collocationAnalysis.R
@@ -163,7 +163,7 @@
                 tibble()
               }
             }
-            if (maxRecurse > 0 & any(!!as.name(thresholdScore) >= threshold)) {
+            if (maxRecurse > 0 & length(result) > 0 && any(!!as.name(thresholdScore) >= threshold)) {
               recurseWith <- result %>%
                 filter(!!as.name(thresholdScore) >= threshold)
               result <- collocationAnalysis(